请教一个有关R程序中pdf()的问题

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

R菜鸟，请教一个请教一个有关R程序中pdf()的问题，pdf()使用后，pdf文档在哪里？
比如使用下面这个官网上的例子

Examples## Not run: ## Test function for encodingsTestChars <- function(encoding = "ISOLatin1", ...){    pdf(encoding = encoding, ...)    par(pty = "s")    plot(c(-1,16), c(-1,16), type = "n", xlab = "", ylab = "",         xaxs = "i", yaxs = "i")         title(paste("Centred chars in encoding", encoding))    grid(17, 17, lty = 1)    for(i in c(32:255)) {        x <- i %% 16        y <- i %/% 16        points(x, y, pch = i)    }    dev.off()}## there will be many warnings.TestChars("ISOLatin2")## this does not view properly in older viewers.TestChars("ISOLatin2", family = "URWHelvetica")## works well for viewing in gs-based viewers, and often in xpdf.## End(Not run) 运行以后，pdf文档在哪里？谢谢！

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏0 回帖

关键词：PDF R程序 Examples function example 程序

例子乱了，重新粘贴
Examples

## Not run:

## Test function for encodings

TestChars <- function(encoding = "ISOLatin1", ...)

{
    pdf(encoding = encoding, ...)

    par(pty = "s")

    plot(c(-1,16), c(-1,16), type = "n", xlab = "", ylab = "", xaxs = "i", yaxs = "i")

         title(paste("Centred chars in encoding", encoding))

    grid(17, 17, lty = 1)

    for(i in c(32:255)) {
        x <- i %% 16

        y <- i %/% 16

        points(x, y, pch = i)

    }

    dev.off()

}

## there will be many warnings.

TestChars("ISOLatin2")

## this does not view properly in older viewers.

TestChars("ISOLatin2", family = "URWHelvetica")

## works well for viewing in gs-based viewers, and often in xpdf.

## End(Not run)

R没有设置初始的文件保存路径么..

￡烈焰￡ 发表于 2013-7-25 23:29
R没有设置初始的文件保存路径么..

没有设置。默认的路径是什么？我刚才搜了一下，没找到相关的pdf文档。
我才应该是不是有什么命令可以调出来

faithmate 发表于 2013-7-26 02:49
没有设置。默认的路径是什么？我刚才搜了一下，没找到相关的pdf文档。
我才应该是不是有什么命令可以调出 ...

getwd()可以得到默认的工作目录。
setwd()可以修改当下工作目录。

xkdog 发表于 2013-7-26 13:10
getwd()可以得到默认的工作目录。
setwd()可以修改当下工作目录。

嗯 是的 找到了 非常感谢！

如何加金币？想加点金币聊表心意，可没找到地方。。。