我知道我们可以使用apply或lapply来执行在R中for循环可以做的事情,如果您有一个dataframe,您可以使用apply (dataframe,2,mean)来计算列的平均值,但是,如果我们有数据列表,那么我需要通过删除第一列并将数据转换为数字来进行以下调整。让我们说,数据的列表是列表,其中LIST[1]是第一个数据。
如何使用列表立即执行上述操作。如何使用lapply对列表中的数据进行操作?
lapply(LIST, function (x) some function)
将该操作应用于“不对数据文件进行列表”。以下是没有任何意义的:
lapply(LIST[], function
我在R中有一个数据帧df,它有几列,其中columnA和columnB在这里很重要:
columnA columnB
ab1 'This is a string'
ts4 'This is another string'
pq9 'This is yet another string'
我想将字符串写入一个文件,并在文件名中包含匹配的columnA值。
sapply(df$columnB, function(x){
write.table(x,
file = paste(
我有一个数据帧加载到R中,按组具有不同的值:
Group Value
A 50
A 2
A 55
B 41
B 60
B 102
C 24
C 60
C 2
D 6
D 9
D 20
E 1
E 23
E 19
我正在使用拆分函数按组拆分数据:
mylist <- split(mydata, mydata$Group)
mylist
然后,我创建了一个auto.arima函数,当我在一个单独的组上运行它时,它可以工作并返回ARIMA输出(该组已经作为单独的数据帧加载到R
我需要计算图表的平均值。
我在数据库中有15k行,我的索引是时间。
我用了两种不同的方法:
1)我重复时间间隔(对于每个间隔):-日期之间的原始数据请求-此时间间隔的平均计算( PHP )
2) Map and Reduce:对于每个间隔,reduce函数对数据进行计数,然后在finalize函数中计算平均值。
m = function() {
var k = new Date(this.date);
k.setSeconds(0);
k.setMilliseconds(0);
emit(
k,
我的数据如下所示:
data <- data.frame(
value = runif(10)
id = c("junk","start","1","2","end","morejunk","junk","start","4","end")
)
我想使用filter()从id "start"中提取所有内容,直到id "end"。问题是起始行和结束行之间的观察值数量不同,所以我不能过滤每x行。
在使用lapply函数时,我试图将列名保留在数据帧列表中。我有一个数据帧的列表。让我们说:
lst:
[[1]] [[2]]
A ind C ind
1 0 4 2
2 1 8 0
我试图获取每个dataframe的第一列的元素([1]和[2]),它们在每个数据帧的第二列中具有索引0。
我在用密码
aux <- lapply(lst, functio