回答情况：
提问时间：
问题标签：
我试图使用基于第5列中的二进制变量的dataframe来处理lapply函数。t.test.by.ind = function(x, ind) { return(t.test我尝试过几种变体，如： return(apply(MARGI
浏览 3修改于2020-05-12得票数 2
回答已采纳
我希望使用lapply()-function来查找每行的平均值(变量3、4、5、6和7的平均值)，然后用这些方法创建一个新列(cbind)。可以这样做吗，比如使用一个矩阵和apply()-function，您可以在其中指定行与列的选择：
apply(matrix, 1, mean) #will go through all the rows
浏览 1提问于2018-06-23得票数 1
回答已采纳
permuations cont=seq(start+1,start+nperm*2+2,by=2) #grabbing columns of interest
names(x) })
问题归结为:如何使用lapply (或类似的函数)将函数应用于数据集中
浏览 0修改于2016-06-26得票数 0
但是，我用了这个之后得到了这个[1] "xxxxx" "yyyy
浏览 4修改于2020-02-13得票数 0
1回答
我希望使用lapply包将第二个foreach函数(# Make the new list)转换为foreach循环。## Example datares <- lapply(1:5, function(x) lapply(1:10, function</
浏览 5修改于2015-09-15得票数 4
回答已采纳
6回答
(1:3, function(i) lapply(2014:2015, function(t) DF[with(DF, as.Date(paste(t, "01", "01", sep = "-"))(DF, lapply, function(x) rbind(head(x), tail(x)))
DF <-(1:3, function</em
浏览 58修改于2017-07-09得票数 12
回答已采纳
定义了方法setMethod("as.list", "MyClass",现在给出这个类的一个对象，myobj当我使用l
浏览 1提问于2014-09-27得票数 6
回答已采纳
A_files1 = unlist(lapply(files1, function(x) x$percentageA[x$position==1000]))G_files1 = unlist(lapply(files1, function(x) xunlist(lapply(files2, functio
浏览 0修改于2016-12-29得票数 0
在下面的代码中，我可以使用从foo循环中从CSV文件导入的4个固定参数成功地运行lapply。但是，我想知道如何在lapply命令中插入...中定义的参数？(1:length(L), function(i) L[[i]]$n) post <- lapply(1:length(L), function(i) L[[i]]$post)
control
浏览 1提问于2019-06-22得票数 4
回答已采纳
我不知道这些承诺在R中做了什么a = lapply(seq_len(2), function(n) { function() {n}})function () n<environment: 0x7f9b2416ad18>
function () n<environmentlapply
<em
浏览 2修改于2013-07-08得票数 5
在数据帧的列表listdf中，我希望确定每个数据帧中列集中的平均值、最大值、最小值、stdv以及列集中的数或行数(值数)：max <- lapply(listdf, function(x) {max(x$Concentration, na.rm = F)})
min<- lapply(listdf, function(x) {m
浏览 1提问于2020-06-23得票数 0
回答已采纳
switch(bracket, all = { P1 <- lapply(Text, function(j) gsub("[\\[\\]]",\\)", j))[[1]]))
浏览 5修改于2011-12-24得票数 8
回答已采纳
下面是它们： lapply(regex, function(y) grep(y, x, value = TRUE)) }) lapply(x, function(y) sub("[a-z]+,", "", y)) })
lapply
浏览 3修改于2014-07-14得票数 1
回答已采纳
然而，与通常的lapply函数相比，使用mclapply函数所需的计算时间要长得多。lapplyoutput <- lapply(1:NROW(c), function(o){time_lapply <- proc.time() - p
浏览 0修改于2019-02-12得票数 4
回答已采纳
我试图在R中分析lapply函数的效率，但是我在文件夹"base“中没有找到lapply的原始开发代码，所以我自己编写了一个简单的代码。new_lapply<-function(data,f_name){ for (i in length(data)){ }}lapply(check,length)
浏览 5修改于2015-05-03得票数 2
回答已采纳
x <- list(a=1, b=1)JSON <- rep(list(x,y),10000) unlist(lapply(JSON, function(x) x$a)),
sapply(JSON, "[[", "a")expr min lq median uq
浏览 2修改于2013-09-12得票数 20
回答已采纳
下面的lapply将列表中的每个元素乘以2是否可以使用lapply为列表中的每个元素指定不同的y？下面的伪代码就是一个例子：
lapply(1:5, function(x, y) x * y, y = 1 if x is odd and = 2 if x is even)
浏览 1提问于2014-08-14得票数 1
回答已采纳
不知道如何使用lapply，它让人抓狂。是的，我查阅了?lapply和包括和在内的几本书，但仍然找不出我做错了什么。## Error: 'package' must be of length 1
lapply(X= c("ggplot2", "gtable", "grid"),
浏览 7修改于2013-03-07得票数 4
回答已采纳
1回答
我想构建一个简单的lapply函数，如果发生错误，它将输出NULL。我的第一个想法是做这样的事 lapply(X,tryCatch({FUN},error=function(e) NULL)) if (x==9){
stop("There is something strange in th
浏览 2修改于2017-05-23得票数 2
回答已采纳
腾讯云开发者
Copyright © 2013 - 2026 Tencent Cloud. All Rights Reserved. 腾讯云 版权所有
深圳市腾讯计算机系统有限公司 ICP备案/许可证号：粤B2-20090059 
粤公网安备44030502008569号
腾讯云计算（北京）有限责任公司 京ICP证150476号 | 京ICP备11018762号