221206_fr-FR

liliconcom

Enregistrement du journal au format PNG (ou PDF)

J'essaie d'enregistrer un tableau très basique au format PNG (ou PDF).Je suis capable de créer un journal avec ma table mais je n'ai pas réussi à l'enregistrer correctement.De la lecture sur ce babillard et de la consultation du guide de script, ce qui suit devrait fonctionner, mais cela ne sauve rien.

 

Toute aide serait appréciée.

 

Names default to here(1);

dt = current data table();


path_to_results=Pick Directory("Results folder");
r = Column Dialog(
 cats = Col List("Categories", Max Col( 10 ), MinCol( 0 )),
  
 );
cat = r["cats"];

st = Data Table( Eval(TableName) ) <<
Summary(
 Group(
  :Label1,
  Eval(cat)
 )
);

jrn = st << Journal;
jrn << SavePDF( path_to_results||"categorychart.pdf");

Re : Enregistrer le journal au format PNG (ou PDF)

et @SDF1 a une excellente solution en utilisant un tableau de bord.

https://community.jmp.com/t5/Discussions/Save-Graph-amp-Datatable-and-output-as-png-file/mp/221844#M44269

Re : Enregistrer le journal au format PNG (ou PDF)

Désolé, j'ai raté le bit du tableau de données. Les tableaux de données n'agissent pas comme des plates-formes d'analyse lorsqu'ils tentent de prendre des photos de leurs boîtes d'affichage. Voici une autre approche, en utilisant une boîte de journal.

dt = Open( "$sample_data/Cereal.jmp" );
journaltext = (Window( dt )) << getjournal;
journalbox = Journal Box( journaltext );
image = journalbox << getpicture;
New Window( "image", image );
pdf = journalbox << savepdf( "$temp/cereal.pdf" );
Open( "$temp/cereal.pdf" );

image capture of tableimage capture of tablecapture d'image du tableau

Vous pouvez enregistrer une image avec

journalbox << savepicture( "$temp/cereal.png", "png" );

 

Re : Enregistrer le journal au format PNG (ou PDF)

Pour fermer ça.J'ai pu trouver une solution pour faire ce que je voulais.

 

J'ai écrit une fonction pour afficher mon tableau dans une nouvelle fenêtre, puis j'ai enregistré cette nouvelle fenêtre sous forme de fichier png.

 

SplitChartCreator = Function({dt,path_to_results},{Default Local},

 r = Column Dialog(
  split = Col List("Split Columns", Max Col( 10 ), MinCol( 0 )),
   
  );
 splits = r["split"];

 st = dt <<
 Summary(
  Group(
   :Lot,
   :Wafer,
   Eval(splits)
  )
 );

 st << Delete Columns ( "N Rows" );

 tb = Table Box();
  For (i=1,i<=NCols(st),i++,
   col = Column(st,i);
   colName = col << Get Name;
   lstValues = col << Get Values;
   type = col << Get Data Type;
   If (type=="Character",
    tb << Append(
     String Col Box(colName,lstValues)
    )
   ,
    tb << Append(
     Number Col Box(colName,lstValues)
    )
   );
  );
  
 content = H List Box(
  Outline Box("splitchart", << Outline Close Orientation("Vertical"),
   tb
  )
 );

 pw = New Window("splitchart", content);
 img = pw << getpicture();
 img << saveImage(path_to_results||"splitchart.png", "png"); 
 Close(st, NoSave);
 pw << Close Window();
);

Re : Enregistrer le journal au format PNG (ou PDF)

Oui.@Wendy_Murphrey juste posté un XPath moyen de naviguer vers un nœud dans l'arborescence de la zone d'affichage, ou vous pouvez utiliser l'indice de la zone d'affichage. Lorsque vous arrivez au bon nœud, enregistrez-le au format PNG. Quelque chose comme ça en utilisant des indices de boîte d'affichage.

from the top left red triangle in the report, Edit->Show Tree Structurefrom the top left red triangle in the report, Edit->Show Tree Structureà partir du triangle rouge en haut à gauche du rapport, Edition->Afficher l'arborescence

Utilisez la commande show tree structure pour identifier la partie du rapport dont vous avez besoin. Ici, la boîte d'image (1) capture le graphique sans le titre pour toute la section. Ensuite, utilisez JSL comme ceci :

dt = Open( "$sample_data/big class.jmp" );
dist = dt << Distribution(
 Continuous Distribution( Column( :weight ) ),
 Nominal Distribution( Column( :age ) )
);

boxtree = Report( dist );
picbox = boxtree[Picture Box( 1 )];
picbox << savepicture( "$desktop/distrib.png", "png" );

The captured PNG fileThe captured PNG fileLe fichier PNG capturé

Au moment où j'avais défini la variable picbox, je n'étais pas sûr de la commande pour prendre une photo. J'ai utilisé ceci pour savoir quelles commandes étaient disponibles pour cette boîte:

showproperties(picbox)

et j'ai trouvé ceci dans la liste :

save picture commandsave picture commandcommande d'enregistrement d'image

que vous pouvez ensuite rechercher dans l'index de script :

Help->Scripting IndexHelp->Scripting IndexAide-> Index des scripts

Re : Enregistrer le journal au format PNG (ou PDF)

Merci.Cela résout le problème avec la fonction SavePDF mais hélas, cela ne fait pas ce que je veux.Ce que je dois vraiment faire, c'est enregistrer la petite table en tant qu'image plutôt que tous les extras.Des suggestions sur la façon d'enregistrer simplement un PNG avec le tableau uniquement ?Peut-être quelque chose comme la création d'un tableau dans une nouvelle fenêtre, puis l'enregistrement d'une image de la nouvelle fenêtre au format PNG.

Re : Enregistrer le journal au format PNG (ou PDF)

Dans JMP 14, <

jrn=currentjournal();

puis enregistrez le pdf.