我有一个简单的列表和一个相同长度的简单向量.我想将ith向量的ith元素添加到列表的元素中.有没有办法比这个循环更好?
test <- list(element1=list(a=1,b=2,a1=8),
element2=list(a=9,d=17))
vec <- c(12,25)
for (i in 1:length(test)){
test[[i]] <- c(test[[i]],vec[i])
}
Run Code Online (Sandbox Code Playgroud) 有一个csv数据文件,其中填充了大量原始数据,如下所示:
data.frame(
id=1:4,
data=c(
"it's a programming language",
"this data is JUNK",
"refer www.google.com",
"check for more information")
)
Run Code Online (Sandbox Code Playgroud)
我需要处理这些数据,并为每一行检查一个ALL CAPS序列,并用0/1条目填充一个新列.
输出文件如下:
id data all_caps
1 it's a programming language 0
2 this data is JUNK 1
3 refer www.google.com 0
4 check for more information 0
Run Code Online (Sandbox Code Playgroud)
如何用R实现这一目标?我一直在寻找这个,但是没有找到任何有效的结果来处理每一行.
我有以下数据作为示例:
basketball = c("MISS W. Johnson 18' Pullup Jump Shot",
"MISS Barnes 12' Pullup Jump Shot",
"MISS Carter 19' Pullup Jump Shot")
Run Code Online (Sandbox Code Playgroud)
我如何找到最常见的单词或"相交"它们,以便我只能得到"MISS Pullup Jump Shot"结果?
我的数据框中有一些单词df属于A类或B类.在每个类别中,单词可以是1,2或3类型.我使用该table()函数来显示单词在类别和类型中的分布情况.输出如下:
category
type A B
1 30 79
2 12 94
3 29 6
Run Code Online (Sandbox Code Playgroud)
正如您所看到的,表格会计算频率,但我希望它能够计算百分比.我试过prop.table但是我得到以下错误
FUN中的错误(X [[1L]],...):仅在具有所有数字变量的数据帧上定义
我无法在其他任何地方找到解决方案; 请帮忙.谢谢.
这是我的示例数据:
head(items)
item type category
[1] PA100 1 A
[2] PB101 2 A
[3] UR360 2 A
[4] PX977 3 B
[5] GA008 3 B
[6] GR446 3 A
Run Code Online (Sandbox Code Playgroud) 我有一个元素在某一行中的向量,但现在我想改变这些元素的顺序.我怎么能只用一行代码呢?
# 1.create queue
queue <- c("James", "Mary", "Steve", "Alex", "Patricia")
queue
# 2.move Patricia to be in front of Steve
???
Run Code Online (Sandbox Code Playgroud)
我是R的初学者,所以让你的回答尽可能简单,尽可能淡化!谢谢!
这可能是一个愚蠢的问题,但我已经困扰了很长一段时间.我看到人们在定义函数时使用单引号括起函数名.我一直在想这样做的好处.以下是一个天真的例子
'row.mean' <- function(mat){
return(apply(mat, 1, mean))
}
Run Code Online (Sandbox Code Playgroud)
提前致谢!
是否有可能只用平均值,标准差和n值在r中运行ANOVA?这是我的数据框:
q2data.mean <- c(90,85,92,100,102,106)
q2data.sd <- c(9.035613,11.479667,9.760268,7.662572,9.830258,9.111457)
q2data.n <- c(9,9,9,9,9,9)
q2data.frame <- data.frame(q2data.mean,q2data.sq,q2data.n)
Run Code Online (Sandbox Code Playgroud)
我试图找到平方余数,所以我想看看ANOVA表.
任何帮助将非常感激!:)
所以我试图得到一条回归线来显示数据图,但它不起作用.我尝试重新启动R,检查代码,它看起来对我来说完全没问题.abline()命令适用于我今天制作的每一个情节,而不是这个.
这是我使用的命令:
hw3c <- read.csv(file.choose(), header = T)
model.3c <- lm(hw3c)
plot(hw3c)
abline(model.3c)
Run Code Online (Sandbox Code Playgroud)
数据是:
Crab,Sal
0.7,3
1.7,3.2
1.3,6.5
2.2,6.5
0.9,9.4
3.2,23.4
5,27.1
Run Code Online (Sandbox Code Playgroud)
我知道这很简单,我不明白为什么它不起作用.救命?
我有一个包含多个分隔符的文本文件.这是一个数据样本:
12 ->3 4 5
14->2 1
1->3 5 6
Run Code Online (Sandbox Code Playgroud)
我想知道是否有一种简单的方法来获取以下格式的数据:
12 3
12 4
12 5
14 2
14 1
1 3
1 5
1 6
Run Code Online (Sandbox Code Playgroud) a<-list(5,6,8,4,5,2)
b<-c(3,2,1)
Run Code Online (Sandbox Code Playgroud)
我想根据"b"将"a"加起来形成一个新列表.
即(5 + 6 + 8),(4 + 5),2
预期的结果是:
[[1]]
[1] 19
[[2]]
[1] 9
[[3]]
[1] 2
Run Code Online (Sandbox Code Playgroud)
我使用下面的代码来解决这个问题,但我想知道是否有更方便的方法来解决这个问题.谢谢!
p<-rep(1:length(b),b)
as.list(sapply(1:length(b), function(x) {sum(as.numeric(a)[which(p==x)])}))
Run Code Online (Sandbox Code Playgroud)