Questions tagged «r»

尝试将新行覆盖到现有ggplot时，出现以下错误： Error: ggplot2 doesn't know how to deal with data of class uneval 我的代码的第一部分工作正常。下图是来自美国中西部电力市场的“最新”每小时风力发电数据。 现在，我想用红色覆盖最后两天的观测值。这应该很容易，但是我无法弄清楚为什么会出错。 任何帮助将不胜感激。 以下是可重现的示例： # Read in Wind data fname <- "https://www.midwestiso.org/Library/Repository/Market%20Reports/20130510_hwd_HIST.csv" df <- read.csv(fname, header=TRUE, sep="," , skip=7) df <- df[1:(length(df$MKTHOUR)-5),] # format variables df$MWh <- as.numeric(df$MWh) df$Datetime <- strptime(df$MKTHOUR, "%m/%d/%y %I:%M %p") # Create some …

101 r  ggplot2 

在R中，我有一个操作会创建一些 Inf在转换数据框时值。 我想将这些Inf价值观变成NA价值观。我拥有的代码处理大数据的速度很慢，有没有较快的方法呢？ 说我有以下数据框： dat <- data.frame(a=c(1, Inf), b=c(Inf, 3), d=c("a","b")) 以下情况仅适用于一种情况： dat[,1][is.infinite(dat[,1])] = NA 所以我用以下循环将其概括 cf_DFinf2NA <- function(x) { for (i in 1:ncol(x)){ x[,i][is.infinite(x[,i])] = NA } return(x) } 但是我不认为这确实是在使用R的功能。

101 r  dataframe  data.table 

我想知道是否可以ggplot2为整个R会话更改某些默认的图形参数，例如字体大小。这样做的想法是避免为每个图设置它们。

101 r  ggplot2  default  font-size 

我正在尝试测试向量的所有元素是否彼此相等。我想出的解决方案似乎有些round回，都涉及检查length()。 x <- c(1, 2, 3, 4, 5, 6, 1) # FALSE y <- rep(2, times = 7) # TRUE 与unique()： length(unique(x)) == 1 length(unique(y)) == 1 与rle()： length(rle(x)$values) == 1 length(rle(y)$values) == 1 一个可以让我包括用于评估要素之间“平等”的容差值的解决方案将是避免FAQ 7.31问题的理想选择。 我完全忽略了针对测试类型的内置函数吗？identical()并all.equal()比较两个R对象，因此它们在这里不起作用。 编辑1 以下是一些基准测试结果。使用代码： library(rbenchmark) John <- function() all( abs(x - mean(x)) < .Machine$double.eps ^ …

101 r  vector  equality 

我的类别需要用希腊字母命名。我正在使用ggplot2，它可以很好地处理数据。不幸的是，我无法弄清楚如何将这些希腊符号放在x轴上（在刻度线处）并使它们出现在图例中。有什么办法吗？ 更新：我看了一下链接，但是，没有描述好的方法来完成我想做的事情。

101 r  graphics  unicode  utf-8  ggplot2 

我想在我自己编写的一个程序包中使用%>%该magrittr程序包中引入的管道运算符来链接dplyr数据转换。在文件中magrittr列出。加载我自己的包并测试使用管道运算符的功能后，我收到以下错误消息：ImportDESCRIPTION 函数名错误（参数，：找不到函数“％>％” 更改%>%为magrittr::%>%函数源代码也无济于事，因为无法再构建软件包。

101 r  namespaces  magrittr 

在解决另一个问题时，我遇到了这个问题： 我可以通过以下方法删除所有R对象： rm(list = ls(all = TRUE)) 是否有等效的命令可以在工作会话期间分离已安装的软件包？ > sessionInfo() R version 2.12.2 (2011-02-25) Platform: i386-pc-mingw32/i386 (32-bit) locale: [1] LC_COLLATE=English_United States.1252 [2] LC_CTYPE=English_United States.1252 [3] LC_MONETARY=English_United States.1252 [4] LC_NUMERIC=C [5] LC_TIME=English_United States.1252 attached base packages: [1] stats graphics grDevices utils datasets methods base 要求（ggplot2） Loading required package: ggplot2 Loading required …

101 r  workspace 

我有这样的字符串： years<-c("20 years old", "1 years old") 我只想从这个向量grep数字。预期输出是向量： c(20, 1) 我该怎么做呢？

101 regex  r 

当我查看R Packages的来源时，我看到了sweep经常使用的函数。有时候，当一个简单的函数就足够了（例如apply）时，就会用到它，而在其他时间，如果不花费大量的时间来遍历其中的代码块，就不可能确切知道它在做什么。 我可以sweep使用更简单的功能来重现效果，这一事实表明我不了解sweep的核心用例，而经常使用此功能的事实表明它非常有用。 上下文： sweep是R标准库中的函数；它的参数是： sweep(x, MARGIN, STATS, FUN="-", check.margin=T, ...) # x is the data # STATS refers to the summary statistics which you wish to 'sweep out' # FUN is the function used to carry out the sweep, "-" is the default 如您所见，参数与相似，apply尽管还sweep需要一个参数STATS。 另一个关键区别是，sweep返回的数组与输入数组的形状相同，而返回的结果apply取决于传入的函数。 sweep 实际上： # e.g., …

100 r  statistics 

我正在使用R解析以下形式的字符串列表： original_string <- "variable_name=variable_value" 首先，我从原始字符串中提取变量名称和值，并将该值转换为数字类。 parameter_value <- as.numeric("variable_value") parameter_name <- "variable_name" 然后，我想将值赋给与parameter_name字符串同名的变量。 variable_name <- parameter_value 进行此操作的功能是什么？

100 string  r 

我想知道如何在多面图中绘制带状文字的大小。我的问题类似于关于情节标题的问题，但是我特别关心的不是操纵情节标题，而是操纵刻面标题（strip_h）中出现的文本。 例如，考虑mpg数据集。 library(ggplot2) qplot(hwy, cty, data = mpg) + facet_grid( . ~ manufacturer) 产生的输出会产生一些带状标题，这些标题不适合该区域。 我认为必须有一种方法grid来处理带状文本。但是我还是一个新手，从哈德利的书的grid附录中不确定该怎么做。另外，我担心如果做错了，会损坏洗衣机，因为我相信所有技术都是通过The Force连接的：-( 提前谢谢了。

100 r  ggplot2 

我想在条形图中绘制未使用的电平（即计数为0的电平），但是，未使用的电平被丢弃，我无法弄清楚如何保持它们 df <- data.frame(type=c("A", "A", "A", "B", "B"), group=rep("group1", 5)) df$type <- factor(df$type, levels=c("A","B", "C")) ggplot(df, aes(x=group, fill=type)) + geom_bar() 在上面的示例中，我想看到C的计数为0，但它完全不存在... 感谢您的帮助Ulrik 编辑： 这就是我想要的 df <- data.frame(type=c("A", "A", "A", "B", "B"), group=rep("group1", 5)) df1 <- data.frame(type=c("A", "A", "A", "B", "B", "A", "A", "C", "B", "B"), group=c(rep("group1", 5),rep("group2", 5))) df$type <- …

100 r  ggplot2  legend  levels 

关闭。此问题不符合堆栈溢出准则。它当前不接受答案。 想改善这个问题吗？更新问题，使其成为Stack Overflow 的主题。 3年前关闭。 改善这个问题 R函数会返回列表中的项目数吗？

99 list  r  count 

我在同一文件夹中有两个文件：Chapter1.Rmd和Chapter2.Rmd，内容如下： 第1章 --- title: "Chapter 1" output: pdf_document --- ## This is chapter 1. {#Chapter1} Next up: [chapter 2](#Chapter2) 第2章 --- title: "Chapter 2" output: pdf_document --- ## This is chapter 2. {#Chapter2} Previously: [chapter 1](#Chapter1) 我该如何编织它们，使它们组合成一个pdf输出？ 当然，render(input = "chapter1.Rmd", output_format = "pdf_document")可以完美地工作，但render(input = "chapter1.Rmd", input = "chapter2.Rmd", output_format = …

99 r  knitr  pandoc  r-markdown 

R中是否有一个功能可以显示大量用逗号分隔的数字？ 即，从1000000到1,000,000。

99 r