Usuari:Lixiaoxu: diferència entre les revisions
Salta a la navegació
Salta a la cerca
(Es crea la pàgina amb «<Rform name="owndata"> Enter your own data for a scatterplot:<br> <textarea name="mydata" rows="8"> 1 2 3 4 5 6 7 8 </textarea> <input type="submit" value=" Submit "> <...».) |
Cap resum de modificació |
||
| Línia 18: | Línia 18: | ||
x <- matrix(1:8, nrow=4, byrow=T) | x <- matrix(1:8, nrow=4, byrow=T) | ||
} | } | ||
pdf(rpdf, | pdf(rpdf, width=6, height=6) | ||
plot(x, cex=2, main=main) | plot(x, cex=2, main=main) | ||
</R> | </R> | ||
Revisió del 08:17, 6 jul 2009
<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>