Usuari:Lixiaoxu

De wikiTraba
Salta a la navegació Salta a la cerca

<Rform name="owndata"> Enter your own data for a scatterplot:
<textarea name="mydata" rows="8"> 1 2 3 4 5 6 7 8 </textarea> <input type="submit" value=" Submit "> </Rform>

<R output="display" name="owndata" iframe="height:500px;"> if (exists("mydata")) {

 main <- "Data from user"
 x <- readdataSK(mydata, format="txt") 

} else {

 main <- "Default data"
 x <- matrix(1:8, nrow=4, byrow=T)

} pdf(rpdf, width=6, height=6) plot(x, cex=2, main=main) </R>