如何在计算中位数时将na.rm = TRUE传递给sapply函数？
我已经创建了一个名为“killers”的数据框，其中包含3个变量。虽然存在NA值，但数据是数字类型。 我的目标是计算每个变量的平均值。sapply(killers, function(x) median) 这将返回：$heartattack function (x, na.rm = FALSE...
使用“...”和“复制”
在sapply和replicate的文档中，有一个关于使用...的警告。 现在，我可以接受这个警告，但是想要了解背后的原因。所以我创建了这个小的人为例子：innerfunction<-function(x, extrapar1=0, extrapar2=extrapar1) { ...
如何在R中从列表中进行子集选择
我有一个相当简单的任务，但还没有找到一个好的解决方案。> mylist [[1]] [1] 1 2 3 4 5 6 7 8 9 10 [[2]] [1] "a" "b" "c" "d&quo...
加速在R中使用sapply调用中的which函数
我有两个向量e和g。我想知道对于e中的每个元素，g中比它小的元素所占的百分比。在R中实现这个功能的一种方法是： set.seed(21) e <- rnorm(1e4) g <- rnorm(1e4) mf <- function(p,v) {100*length(whic...
使用replicate()或sapply()重复一个用户定义的函数
我定义了一个自定义函数，就像这样：my.fun = function() { for (i in 1:1000) { ... for (j in 1:20) { ... } } return(outp...
作为sapply函数参数的美元符号运算符未按预期工作
我有以下清单test_list=list(list(a=1,b=2),list(a=3,b=4)) 我想提取所有列表元素名称为a的元素。我可以通过以下方式实现sapply(test_list,`[[`,"a") 这使我得到了正确的结果。#[1] 1 3 尝试使用美元符号操作符“$”时，我得到了...
在R中创建多个因子列的频率表
我是一个R语言的初学者。我正在为自己的工作编写一份有关常见函数/特性语法的单独手册。我的样本数据框如下： x.sample <- structure(list(Q9_A = structure(c(5L, 3L, 5L, 3L, 5L, 3L, 1L, 5L, 5L, 5L), .L...
当可迭代对象不是函数的第一个参数时
问题很简单，但我找不到答案。 我有一个名为myfun <- function(x, y)的函数。如何在y列表上使用sapply这个函数？ 如果要在x上应用该函数，可以这样做。 iterables <- 1:10 sapply(iterables, myfun, y) 但我...
多列乘以多个组的意思
我正在尝试在数据框的多个分组内查找不包括“NA”的多个列的平均值 airquality <- data.frame(City = c("CityA", "CityA","CityA", "CityB","CityB",...