Code-source


00001     <?php     

00002     include("std.php") ;     

00003     debutPage("Int&eacute;gration R et PHP") ;     

00004     debutSection() ;     

00005          

00006     $fr = "demo.r" ;     

00007     h1("Voici le fichier R utilis&eacute; (".href($fr).")&nbsp;:") ;     

00008     pre_fichier($fr,"cadrejaune") ;     

00009          

00010     h1("Voici le r&eacute;sultat de l'ex&eacute;cution&nbsp;:") ;     

00011     $fs = tempnam("/tmp","demo.res") ;     

00012     echo "<!-- le fichier est $fs -->\n" ;     

00013     system("R --vanilla --slave < $fr > $fs") ;     

00014     pre_fichier($fs,"cadrebleu") ;     

00015          

00016     finSection() ;     

00017     finPage() ;     

00018     ?>

Pour ne pas voir les numéros de ligne, ajoutez &nl=non à la suite du nom du fichier.

Listing du fichier phpetr04.php