Vous pouvez créer un objet contenant uniquement le graphique, puis lui envoyer le message Enregistrer la présentation. Essayez de remplacer votre dernière ligne par ceci :
wbd1Plot = Report( wbd1 )["Compare Distribution", ListBox(4)];
wbd1Plot << Save Presentation( "C:/Users/WbChart.pptx" );
Pour trouver le bon index pour référencer le tracé, vous pouvez utiliser Affichage > Afficher les propriétés, puis mettre en surbrillance le tracé lui-même. Sous la section Box Path, vous trouverez le bon index à utiliser : ["Compare Distribution", ListBox(4)].
Ross :
Merci beaucoup pour la contribution. J'ai suivi vos instructions pour JMP 16 pour afficher l'arborescence. La distribution de Weibull était sous ListBox(5). J'ai essayé cela dans le code que vous avez fourni mais le ppt résultant a été créé mais n'avait pas de contenu. Je suis retourné à la structure arborescente et j'ai découvert que le graphique lui-même sous ListBox(5) s'appelait LayoutAtomBox(1). J'ai donc essayé cela à la place de ListBox(5) et cela fonctionne. Seul le tracé Weibull Dist a été envoyé au ppt. Je ne sais pas pourquoi le ListBox(5) n'a pas fonctionné mais je vais continuer avec ça. Encore un grand merci pour la solution.
Permettez-moi de modifier cette réponse : la section Box Path dans le volet Propriétés est disponible dans JMP 17, qui vient de sortir l'automne dernier. Pour trouver le bon index pour le tracé dans JMP 16 et versions antérieures, vous devez cliquer avec le bouton droit de la souris sur l'icône de divulgation grise à côté de l'en-tête de la section Comparer la distribution et sélectionner Modifier > Afficher l'arborescence.
J'utilise le script ci-dessous pour générer un tracé de distribution Weibull, via le portail Life Distribution, puis l'envoyer à Powerpoint. De plus, je transforme dans un tableau de données les données d'estimation paramétrique de Weibull qui incluent l'alpha et le bêta de Weibull.
Le problème est qu'avec le tracé de Weibull, plusieurs autres tracés et tableaux sont également envoyés en ppt, une trentaine de diapositives de graphiques et d'images.
Existe-t-il un moyen de n'apporter que le diagramme de distribution de Weibull ?
//Tracé de distribution de Weibull
wbd1 = ss2DT << Distribution de vie(
Perspective (comparer les groupes),
Y( :VALEURABS ),
Groupement( :GRP ),
Méthode de l'intervalle de confiance ( Wald ),
Sélectionnez Distribution( Distribution, Weibull ),
Sélectionnez Échelle ( Weibull ),
Rapport à onglets( 0 ),
EnvoyerVersRapport(
Expédition(
{"Distribution de vie - Comparer les groupes", "Comparer la distribution"},
"1",
ScaleBox,
{Format( "Fixe Dec", 12, 2 ), Min( 1.5 ), Max( 6 ), Inc( 0.3 ),
Coches mineures( 1 )}
),
Expédition(
{"Distribution de vie - Comparer les groupes", "Comparer la distribution"},
"2",
ScaleBox,
{Min( 0.000002502137722793 ), Max( 0.999941236419419 ),
Ajouter une ligne de référence (0,632, "Pointillé", "Noir", "", 1 )}
),
Expédition(
{"Distribution de vie - Comparer les groupes", "Comparer la distribution"},
"Groupes de comparaison de distribution de vie",
FrameBox,
{Taille du marqueur( 2 )}
),
Expédition(
{"Distribution de vie - Comparer les groupes", "Comparer la distribution"},
"VALUEABS",
TextEditBox,
{Définir Texte( "Parm 1" )}
)
)
);
// Générer une table de données paramétriques Weibell
wbdt1 = Report( wbd1 )[Outline Box( "Life Distribution - Compare Groups" )][
Outline Box( "Statistiques" )][Outline Box( "Estimations des paramètres" )][
Outline Box( "Estimation paramétrique - Weibull" )][Table Box( 1 )] <<
Make Data Table( "Parm 1 Wb" );
wbdt1 << Enregistrer( "C:/Users/Wdt1.jmp" );
// Enregistrer la distribution de Weibull en ppt
Attendez(2);
Afficher les propriétés ( wbd1 );
wbd1 << Enregistrer la présentation( "C:/Users/WbChart.pptx" );
