回答情况：
提问时间：
问题标签：
我需要在另一个sapply中执行sapply。 这是我拥有的工作代码。animal <- c("Dog", "Cat", "Bird", "Fish", "Monkey", "Lion", "Dolphin", "Panda")
a <- as.data.frame(sapplyanimal <- c("Dog", "Cat"
浏览 13修改于2019-05-30得票数 0
回答已采纳
我下面的lapply(sapply())运行得很好。但我想知道是否有一种方法可以只调用一次循环函数，而不是像lapply(sapply())那样调用两次，或者有一种方法可以使代码更短？raw.githubusercontent.com/rnorouzian/e/master/hsb.csv')
ols <- lapply(1:2,function(j)sapply
浏览 13提问于2020-10-22得票数 0
回答已采纳
我只是在玩和试用R，我很难将我的sapply()命令合并成一个表达式。我用这个来刻薄：sapply(height_weight[2:7],max,na.rm
浏览 2修改于2014-04-23得票数 0
2回答
我已经编写了自己的汇总函数，以准确地返回我需要的内容，并使用sapply将该函数一次应用于所有变量。sfbalanced$login86, sfbalanced$p_inc87, sfbalanced$login87,
summ=sapply
浏览 1提问于2018-05-22得票数 5
如果所有模型都成功运行，则下列操作正常：但是，如果其中一个模型失败，coef()将返回'NULL'，这与其他返回值的长度不同，我将得到一个列表而不是一个数组:(Coefs = sapply(ModelList, coef)
typical = Coefs[[1]] # (oughttypical[1:length(typical)] = NA # Replace all coefficients
浏览 1提问于2014-11-04得票数 1
回答已采纳
我想重写中的一些第一行，我不知道为什么我的sapply行不能工作。c(1:10), 10)}cols <- sample(c(1:5), 1) sapply(1:cols, function(x) { mydata[,(x+1)] <- sample(c(1:10), 10) } )sap
浏览 0提问于2018-03-23得票数 2
回答已采纳
1回答
在下面的代码中，作为使用sapply删除for循环的学习练习，我尝试使用sapply返回向量的最小值： min(nv)y
正如预期的那样，不是将min函数应用于整个fector返回1，而是对返回1 2 3 4 5 6 7 8 9 10的向量中的每个元素计算min。如何使用sapply处理整个向量，从而返回1？
浏览 2提问于2017-09-21得票数 1
回答已采纳
2回答
我对R非常陌生，我听说最好用apply函数替换循环，但是我无法思考如何用这个例子来转换循环。任何帮助都将不胜感激。file_path[1] = "/home/user/a.rds"...
for(i in 1:5){ temp_data <- as.matrix(temp_d
浏览 1修改于2022-11-05得票数 0
> > sapply(x, function(x) 1/x)Error in 1/x[[i]] : non-numeric argument to binary operator> i当我使用lapply/sapply
浏览 1提问于2009-09-08得票数 35
回答已采纳
', 'CLP', 'COP', 'MXN', 'PEN', 'CNY', 'IDR', 'INR', i <- sapply(cur, function(y) grep(y,names(x)), USE.NAMES = F)
Merged
浏览 2修改于2017-02-10得票数 0
回答已采纳
1回答
as.numeric(x-as.Date("2013-01-01")))))for (i in 1:length(a)) { print(myFun(a[i])) }工作正常，但是
sapply
浏览 0修改于2013-03-15得票数 0
回答已采纳
2回答
这是我的函数 mean <- sort(sapply(table(x$filetypedef),mean), decreasing = TRUE) min<- sort(sapply(table(x$filetypedef),min), decreasi
浏览 12修改于2020-05-18得票数 0
回答已采纳
比如说，800分钟内所有传感器的状态是：我想知道每分钟活动感应器的数目(即显示一个)。我该怎么做？不知怎么的，我们得把另一个sapply()放在这里.使用for循环的解决方案如下所示for (k in 1:1440){
status_ones[k] <- sum(sapply(statuses
浏览 0修改于2017-09-28得票数 0
回答已采纳
如果您想对POSIXct对象列表应用format以外的函数，该怎么办？例如，假设我想要取一个时间向量，将这些时间截断为小时，并对每个时间应用一个任意函数。> obs.truncated=trunc(obs.times, units="hours")[1] "2010-01-02 12:0
浏览 0提问于2010-07-07得票数 2
回答已采纳
在我使用sapply之后，我得到了一个列表，我想要访问这些列表中的各个元素。到目前为止，我已经做到了： seq(enter.shift.want[x], to
浏览 0修改于2014-11-03得票数 0
要填充矩阵，下面的循环工作： X[row, pos[row]] <- 1有没有一种不需要循环的方法，也许可以使用sapply
浏览 0提问于2016-04-01得票数 1
回答已采纳
腾讯云开发者
Copyright © 2013 - 2026 Tencent Cloud. All Rights Reserved. 腾讯云 版权所有
深圳市腾讯计算机系统有限公司 ICP备案/许可证号：粤B2-20090059 
粤公网安备44030502008569号
腾讯云计算（北京）有限责任公司 京ICP证150476号 | 京ICP备11018762号