Tag: r

给定颜色的透明等效物: 我已经有了这几次，所以在这里：我正在做一些曲线，用给定的调整参数估计参数。通常情况下，我也有每个估计值的SD，所以我可以在他们每个人周围显示错误栏。但是，我不喜欢错误栏，并希望一些平滑的版本。这本身没有问题（即我知道如何做到这一点）。但是，我的情节包含几个这些相似的曲线，每个都有自己的颜色。所以我想用与曲线本身颜色相匹配的颜色在每条曲线上添加“平滑的误差区域”。当然，我想这样做有点透明，所以我仍然可以通过“错误区域”看到其他曲线。所以，我的问题是：给定一个颜色（由一个数字，一个名称或一个rgb值指定） – 注意前两个提出了一个额外的问题，但这是经常发生的，因为基本的绘图function将其视为有效颜色值），我怎么能find匹配的颜色具有相同的rgb，但不同的（给定的）alpha级别（透明度）。我想要一个像这样的function： makeTransparent<-function(someColor, alpha=100) { newColor<-someColor + alpha #I wish return(newColor) } 这应该适用于像这样的事情： makeTransparent(2) makeTransparent("red") makeTransparent(rgb(0,0,1)) 编辑我讨厌它，当我错过了一些明显的东西，但@themel指出我（thx再次）。这里有一个完整的解决scheme（注意：vector化的工作，所以你可以传递多种颜色，但目前只支持一个alpha）： #note: always pass alpha on the 0-255 scale makeTransparent<-function(someColor, alpha=100) { newColor<-col2rgb(someColor) apply(newColor, 2, function(curcoldata){rgb(red=curcoldata[1], green=curcoldata[2], blue=curcoldata[3],alpha=alpha, maxColorValue=255)}) }

R：打破循环: 你能否确认下一次rest是否取消了内循环？ for (out in 1:n_old){ id_velho <- old_table_df$id[out] for (in in 1:n) { id_novo <- new_table_df$ID[in] if(id_velho==id_novo) { break }else if(in == n) { sold_df <- rbind(sold_df,old_table_df[out,]) } } }

将R向量转换为1个元素的string向量: 我正在使用编程语言R现在。我有一个vector： a <- c("aa", "bb", "cc") 我想将这些粘贴到系统命令中，现在我正在尝试这种方式： args <- paste(a, sep=" ") system(paste("command",args, sep=" ")) 但现在我只得到论据aa，我想要的论据aa，bb和cc … 任何人都知道我在做什么错了？

读取csv文件并在Python中返回data.frame: 我有一个CSV文件， "value.txt"与以下内容：该文件的前几行是： Date,"price","factor_1","factor_2" 2012-06-11,1600.20,1.255,1.548 2012-06-12,1610.02,1.258,1.554 2012-06-13,1618.07,1.249,1.552 2012-06-14,1624.40,1.253,1.556 2012-06-15,1626.15,1.258,1.552 2012-06-16,1626.15,1.263,1.558 2012-06-17,1626.15,1.264,1.572 在R中我们可以在使用中读取这个文件 price <- read.csv("value.txt") 这将返回一个data.frame我可以用于统计操作： > price <- read.csv("value.txt") > price Date price factor_1 factor_2 1 2012-06-11 1600.20 1.255 1.548 2 2012-06-12 1610.02 1.258 1.554 3 2012-06-13 1618.07 1.249 1.552 4 2012-06-14 1624.40 1.253 1.556 5 2012-06-15 1626.15 1.258 1.552 6 2012-06-16 1626.15 1.263 1.558 […]

用0replacematrix<0.1中的所有值: 我有一个来自空气质量模型的颗粒物质浓度估计matrix（260×58）。由于实际的空气质量监测器不能测量低于0.1微克/升，我需要replace我的matrix中的所有值<0.1与零/ NA /空值。有人用逻辑语句提示了ifelse(test, true, false) ，但是当我尝试这个时，它删除了所有东西。

初学者的R课程的结构: 我意识到这是一个问题，可能不会有一个最好的答案，并可能是封闭的，但我认为这可能会得到一些非常有用的答案，所以也许它可以转化为CW。假设你必须授予R课程来完成初学者，并且你有时间这么做，所以你需要在你强调的方面做出select。这是伟大的，年轻的天真的心灵弯曲我们的意志！但是我们怎么做呢？我们如何才能最好地为绝对初学者build立一个R课程，以便他们成为R的高效用户。我们希望他们做一切正确，高效的工作，当然我们希望他们能够把事情放在第一位。我想到的一些问题是：缩进和使用适当的编码风格非常重要。这应该是第一件事？甚至在看如何分配对象之前？循环vs适用vsvector化，你最先强调什么？我认为循环很容易学习和简单明了，以至于先强调一下，它们可能不会产生非常高效的代码，但它们能够使事情顺利进行。然后，立即强调vector化可能会使它们从长远来看更有效率。让他们从一开始就使用RStudio？什么是一个很好的命令来介绍的东西？

如何删除只包含NAs的列？: 我有一个data.frame包含一些具有所有NA值的列，我怎么能从data.frame中删除它们。我可以使用该function吗？ na.omit(…) 指定一些额外的参数？

使用R解压缩gz文件: 我过去使用了?unzip来获取使用R的压缩文件的内容。这一次，我很难从一个.gz文件中提取文件，可以在这里find。我已经尝试了?gzfile和?gzcon但一直没有得到它的工作。任何帮助，您可以提供将不胜感激。

在给出列名的情况下获取R中的列号: 可能重复：从数据框中的标签获取列索引我需要得到列名的列号。根据我们有以下数据框： df <- data.frame(a=rnorm(100),b=rnorm(100),c=rnorm(100)) 我需要一个像下面这样工作的函数： getColumnNumber(df,"b") 它会返回 [1] 2 有没有这样的function？谢谢！

在R中保存并逐步更新最近邻模型: 有几个最近邻居的R包（例如，FNN，RANN，yaImpute），但是他们都没有似乎允许节约NN数据结构（包括树，KD树等），以便可以计算新查询的最近邻居重build整棵树。 R中有这样的function吗？我正在寻找一个函数返回一个数据结构，我可以随着新的数据到达执行近似K最近邻居search增量更新。