将函数应用于R中的列表矩阵
我有一个列表矩阵 我如何将一个函数应用于每一组列表,并返回一个和原始矩阵维数相同的矩阵 我尝试了将函数应用于R中的列表矩阵,r,list,matrix,apply,R,List,Matrix,Apply,我有一个列表矩阵 我如何将一个函数应用于每一组列表,并返回一个和原始矩阵维数相同的矩阵 我尝试了apply(X=data.matrix,MARGIN=c(1,2),function(X)min(X$p))但它返回了min中的错误(X$p):(从警告转换而来)min没有不丢失的参数;返回Inf 编辑: 我拥有的数据类型示例如下: data.matrix = list() data.matrix$first = list() data.matrix$second = list() data.mat
apply(X=data.matrix,MARGIN=c(1,2),function(X)min(X$p))
但它返回了min中的错误(X$p):(从警告转换而来)min没有不丢失的参数;返回Inf
编辑:
我拥有的数据类型示例如下:
data.matrix = list()
data.matrix$first = list()
data.matrix$second = list()
data.matrix$third = list()
data.matrix$first$a = data.frame(P=runif(3))
data.matrix$first$b = data.frame(P=runif(3))
data.matrix$first$c = data.frame(P=runif(3))
data.matrix$second$a = data.frame(P=runif(3))
data.matrix$second$b = data.frame(P=runif(3))
data.matrix$second$c = data.frame(P=runif(3))
data.matrix$third$a = data.frame(P=runif(3))
data.matrix$third$b = data.frame(P=runif(3))
data.matrix$third$c = data.frame(P=runif(3))
data.matrix = do.call(rbind,data.matrix)
我想得到矩阵中每个元素的min
(或其他任何内容)
谢谢 你可以试试
sapply(data.matrix, function(x) min(x$P))
如果min
值应替换p
列
lapply(data.matrix, function(x) {x$P <- min(x$P);x})
lappy(data.matrix,function(x){x$P可复制示例,请!生成示例-感谢提醒:)如果需要填充最小值以替换data.framelappy(data.matrix,function(x)min(x$P))请尝试sapply(data.matrix,function(x))
{x$P从技术上讲,您有一个二维数据框架列表运行,谢谢,这很有效!我正在尝试apply
,因为它是一个矩阵,没有任何位置。