R原生环境的探索

一个搜索R包的网站

≈

打开一个目录

更改工作目录

打印

终端台的设置

以上是几种对打开窗口的放置方式

可以把图复制

在最基本的环境里面输入

xrange = c(-15, 15) yrange = c(0, 16) plot(0, xlim = xrange, ylim = yrange, type = "n") #plot(xrange, yrange, type="n", ann=FALSE, axes=FALSE) yr = seq(yrange[1], yrange[2], len = 50) offsetFn = function(y) { 2 * sin(0 + y/3) } offset = offsetFn(yr) leftE = function(y) { -10 - offsetFn(y) } rightE = function(y) { 10 + offsetFn(y) } xp = c(leftE(yr), rev(rightE(yr))) yp = c(yr, rev(yr)) polygon(xp, yp, col = "#ffeecc", border = NA) h = 9 xt = seq(0, rightE(h), len = 100) yt = log(1 + log(1 + log(xt + 1))) yt = yt - min(yt) yt = h * yt/max(yt) x = c(leftE(h), rightE(h), rev(xt), -xt) y = c(h, h, rev(yt), yt) polygon(x, y, col = "red", border = NA)

上面那个代码就是这个图，顺手画。你可以复制试试

对图可以导出，格式齐全

随手一个心