Tag: r

R knitr：可以以编程方式修改块标签？

我试图用knitr生成一个报告，在一个数据集的不同子集上执行相同的一组分析。 该项目包含两个Rmd文件：第一个文件是设置工作区和文档的主文档，第二个文件仅包含执行分析和生成相关数字的块。 我想要做的是编织主文件，然后调用每个数据子集的第二个文件，并将结果包含在单个文档中。 下面是一个简单的例子。 主文件： # My report “`{r} library(iterators) data(mtcars) “` “`{r create-iterator} cyl.i <- iter(unique(mtcars$cyl)) “` ## Generate report for each level of cylinder variable “`{r cyl4-report, child='analysis-template.Rmd'} “` “`{r cyl6-report, child='analysis-template.Rmd'} “` “`{r cyl8-report, child='analysis-template.Rmd'} “` 分析-template.Rmd： “`{r, results='asis'} cur.cyl <- nextElem(cyl.i) cat("###", cur.cyl) “` “`{r mpg-histogram} hist(mtcars$mpg[mtcars$cyl == cur.cyl], main = […]

ggplot中的控制点边界厚度

当使用ggplot时，我可以将shape设置为21-25，以获得具有内部（ fill ）和边框（ col ）颜色的独立设置的形状，如下所示： df <- data.frame(id=runif(12), x=1:12, y=runif(12)) ggplot(df, aes(x=x, y=y)) + geom_point(aes(fill=id, size=id), colour="black", shape=21) 但是，我无法弄清楚如何控制形状边框的厚度，或者将它们设置为绝对的或者作为一种审美的映射。 我注意到，如果我设置了一个lwd值，它就会覆盖size美感： ggplot(df, aes(x=x, y=y)) + geom_point(aes(fill=id, size=id), colour="black", shape=21, lwd=2) 我如何控制边框的厚度？

dplyr :: select函数与MASS :: select发生冲突

如果我加载MASS包： library(MASS) 然后加载试图运行dplyr::select ，我得到一个错误： library(dplyr) mtcars %.% select(mpg) # Error in select(`__prev`, mpg) : unused argument (mpg) 我如何使用dplyr::select加载MASS包？

解。 有代理时如何install_github

当你尝试从GitHub的仓库安装一些R包时 install_github('rWBclimate', 'ropensci') 如果您有以下错误： Installing github repo(s) rWBclimate/master from ropensci Downloading rWBclimate.zip from https://github.com/ropensci/rWBclimate/archive/master.zip Error in function (type, msg, asError = TRUE) : Could not resolve host: github.com; Host not found, try again 显示此错误是因为R正尝试通过代理访问Intenet。

为R中的列表元素分配NULL？

我发现这种行为很奇怪，希望更有经验的用户分享他们的想法和解决方法。 在R中运行下面的代码示例： sampleList <- list() d<- data.frame(x1=letters[1:10],x2=1:10,stringsAsFactors=FALSE) for(i in 1:nrow(d)) sampleList[[i]] <- d$x1[i] print(sampleList[[1]]) print(sampleList[[2]]) print(sampleList[[3]]) print(length(sampleList)) sampleList[[2]] <- NULL print(length(sampleList)) print(sampleList[[2]]) print(sampleList[[3]]) 列表元素被上移。 也许这是预期的，但我想实现一个function，我合并列表中的两个元素，并删除一个。 我基本上想要失去那个列表索引或者将它作为NULL。 有什么办法，我可以分配NULL，并没有看到上述行为？ 谢谢你的build议。

数字标题，使用knitr的引用和markdown到html

我正在写一个Rmd文件，由knitr处理成HTML。 它包含一些生成数字的R块，它们以HTML中的数据URI的forms存储。 1）如何为这样的图像添加标题？ 我想要有一个像“图3：等等等等”的标题，其中“3”是自动生成的。 2）我以后如何引用这个图像，即“如图3所示，等等”。

在R中添加简单的图例

我想创build一个非常简单的情节。 我正在使用这些数据 ： a <- read.table("https://dl.dropbox.com/u/22681355/a.csv", sep=',', header=TRUE) plot(a$X25, type="l",col="red", ylim=c(0,100)) lines(a$X25.1, type="l", col="blue") lines(a$X25.2, type="l", col="green") lines(a$X25.3, type="l", col="brown") 现在我想添加一个简单的图例，指出哪个颜色是哪个variables。 我知道我可以使用legend()命令，但是我的问题是，我不知道如何将颜色放在图例中的文本旁边。 最简单的命令是什么？

比较R中两个数据框对象是否相等？

如何检查两个对象，例如数据框，在R中的值是否相等？ 通过值相等，我的意思是一个dataframe的每一列的每一行的值等于第二个dataframe中对应的行和列的值。

ggplot分组的酒吧情节

我有一个调查文件，其中行是观察和列问题。 以下是一些假冒的数据 ： People,Food,Music,People P1,Very Bad,Bad,Good P2,Good,Good,Very Bad P3,Good,Bad,Good P4,Good,Very Bad,Very Good P5,Bad,Good,Very Good P6,Bad,Good,Very Good 我的目标是用ggplot2创build这种情节。 我绝对不在乎颜​​色，devise等 情节不符合假数据 这里是我的假数据： raw <- read.csv("http://pastebin.com/raw.php?i=L8cEKcxS",sep=",") raw[,2]<-factor(raw[,2],levels=c("Very Bad","Bad","Good","Very Good"),ordered=FALSE) raw[,3]<-factor(raw[,3],levels=c("Very Bad","Bad","Good","Very Good"),ordered=FALSE) raw[,4]<-factor(raw[,4],levels=c("Very Bad","Bad","Good","Very Good"),ordered=FALSE) 但是，如果我selectY作为计数，那么我正面临一个关于selectX和组值的问题…我不知道如果我不能使用reshape2 ，我是否能成功…我也厌倦了使用重塑function。 但我不明白如何使用它…

诊断R软件包生成警告：“创buildPDF版本时出现LaTeX错误”

在构build包时，我收到以下警告： * checking PDF version of manual … WARNING LaTeX errors when creating PDF version. This typically indicates Rd problems. 我不知道如何开始诊断。 有没有一个工具告诉我什么.RD文件的问题是在？ 在检查文档步骤中，我没有收到任何有关Rd文件的警告。