Warning: file_get_contents(/data/phpspider/zhask/data//catemap/9/loops/2.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
通过R中的数字列表循环命令_R_Loops - Fatal编程技术网

通过R中的数字列表循环命令

通过R中的数字列表循环命令,r,loops,R,Loops,我正在尝试为以下命令创建循环: cluster0.markers <- FindMarkers(object=NF.combined, ident.1 = 0, min.pct = 0.25) cluster1.markers <- FindMarkers(object=NF.combined, ident.1 = 1, min.pct = 0.25) cluster2.markers <- FindMarkers(object=NF.combined, ident.1 = 2

我正在尝试为以下命令创建循环:

cluster0.markers <- FindMarkers(object=NF.combined, ident.1 = 0, min.pct = 0.25)
cluster1.markers <- FindMarkers(object=NF.combined, ident.1 = 1, min.pct = 0.25)
cluster2.markers <- FindMarkers(object=NF.combined, ident.1 = 2, min.pct = 0.25)
cluster0.markers使用purrr:

find_markers <- function(i) {
    FindMarkers(object=NF.combined, ident.1 = i, min.pct = 0.25)
}

cluster_markers <- 0:2 %>%
    map(~find_markers(.))

find_markers
cluster.markers@AndrewGustar谢谢,效果很好。
find_markers <- function(i) {
    FindMarkers(object=NF.combined, ident.1 = i, min.pct = 0.25)
}

cluster_markers <- 0:2 %>%
    map(~find_markers(.))