使用lapply在列表上创建唯一的成对向量
使用lapply函数在列表上创建唯一的成对向量，可以按照以下步骤进行：
- 首先，确保你已经了解了R语言中的列表（list）和lapply函数的基本概念。
- 列表（list）是一种数据结构，可以存储不同类型的数据对象，包括向量、矩阵、数据框等。lapply函数是R语言中的一个迭代函数，可以对列表中的每个元素应用同一个函数。
- 在这个问题中，我们的目标是使用lapply函数在列表上创建唯一的成对向量。具体步骤如下：
- a. 首先，创建一个包含多个向量的列表。例如，我们可以创建一个包含3个向量的列表，命名为my_list：
- a. 首先，创建一个包含多个向量的列表。例如，我们可以创建一个包含3个向量的列表，命名为my_list：
- b. 接下来，定义一个函数，该函数接受一个向量作为输入，并返回该向量的唯一成对向量。例如，我们可以定义一个函数pair_vector，如下所示：
- b. 接下来，定义一个函数，该函数接受一个向量作为输入，并返回该向量的唯一成对向量。例如，我们可以定义一个函数pair_vector，如下所示：
- 在这个函数中，我们使用combn函数生成输入向量的所有唯一成对组合，并返回这些组合。
- c. 最后，使用lapply函数在列表上应用pair_vector函数。例如，我们可以使用lapply函数在my_list上应用pair_vector函数，并将结果存储在一个新的列表中，命名为paired_vectors：
- c. 最后，使用lapply函数在列表上应用pair_vector函数。例如，我们可以使用lapply函数在my_list上应用pair_vector函数，并将结果存储在一个新的列表中，命名为paired_vectors：
- 这将对my_list中的每个向量应用pair_vector函数，并将结果存储在paired_vectors列表中。
- 至此，我们已经使用lapply函数在列表上创建了唯一的成对向量。你可以通过打印paired_vectors来查看结果。
总结： lapply函数在列表上应用指定的函数，可以用于处理列表中的每个元素。在这个问题中，我们使用lapply函数在列表上创建了唯一的成对向量。具体步骤包括创建列表、定义函数以及使用lapply函数应用函数并存储结果。这个方法可以帮助我们快速处理列表中的数据，并生成所需的结果。
推荐的腾讯云相关产品和产品介绍链接地址：
- 腾讯云云服务器（CVM）：https://cloud.tencent.com/product/cvm
- 腾讯云云数据库 MySQL 版：https://cloud.tencent.com/product/cdb_mysql
- 腾讯云人工智能平台（AI Lab）：https://cloud.tencent.com/product/ailab
- 腾讯云物联网平台（IoT Explorer）：https://cloud.tencent.com/product/explorer
- 腾讯云移动应用开发平台（MPS）：https://cloud.tencent.com/product/mps
- 腾讯云对象存储（COS）：https://cloud.tencent.com/product/cos
- 腾讯云区块链服务（BCS）：https://cloud.tencent.com/product/bcs
- 腾讯云元宇宙服务（Tencent Real-Time Render）：https://cloud.tencent.com/product/trtr
相关·内容
我有一个非常基本的问题，我还没有找到答案，因为我不完全清楚如何问它。我发现的教程，似乎是适当的，都有点过于简化，缺少一些关键信息。
我有一个处理过的数据的列表向量，我试图把它转换成一个表进行下游分析，我被困住了。目前，我有一个带有4088个数值数据的值列表。“数据”的元数据包含我的子类型信息。我用这种方式生成了我的列表：
vec <-vector("list",3)
vec[[1]] <- Values[which(colData(Data)$Type=="Type1")]
vec[[2]] <- Values[which(colData(D
浏览 3提问于2021-06-23得票数 0
回答已采纳
1回答
我正在尝试使用{0,1,2,3}创建字母表的排列。
问题是，我希望每个排列都被转换成'%s-%s-%s'..etc的形式，并存储在一个列表中。例如,
> library(combinat)
> permn(numbers[1:4])
[[1]]
[1] "0" "1" "2" "3"
[[2]]
[1] "0" "1" "3" "2"
.
.
. and so on
但我希望将所有排列的输出转换为特定格式的字符串序列列表，即'
浏览 0提问于2019-06-03得票数 0
回答已采纳
2回答
当用户定义的函数放在一个for循环中时，我很难将它们存储在R列表中。
我必须根据一些参数定义一些特定于段的函数，所以我创建函数，并将它们放在一个列表中，循环使用for-循环的段。问题是，结果列表中的所有地方都有相同的函数。
代码如下所示：
n <- 100
segmenty <- 1:n
segment_functions <- list()
for (i in segmenty){
segment_functions[[i]] <- function(){return(i)}
}
当我运行代码时，我得到的是所有索引的相同函数(最后在循环中创建)：
## for
浏览 3提问于2017-07-28得票数 0
回答已采纳
2回答
从旧列表创建新列表(R)
、、、、
作为一名python用户，到目前为止，R是比较直观的。但是，在从旧列表创建新列表时，我遇到了一个问题。 具体来说，我有一个清单： > x
[[1]]
[1] "Heads" "Tails" "Tails" "Heads" "Tails" "Heads"
[7] "Tails" "Tails" "Tails" "Heads" "Heads" "Tails"
... .... ... et
浏览 22提问于2019-09-25得票数 0
1回答
我有一个包含3个元素的列表，每个元素都是一个包含2个其他元素的列表。第一个，一个四维向量，第二个，比如说，一个字符.下面的代码将生成一个与我刚才描述的一模一样的列表：
x <- NULL
for(i in 1:3){
set.seed(i); a <- list(sample(1:4, 4, replace = T), LETTERS[i])
x <- c(x, list(a))
}
它的结构位于以下类型之前(由于我使用了sample函数，确切的值可能会变粗)：
> str(x)
List of 3
$ :List of 2
..$ : int [1:4]
浏览 2提问于2016-06-01得票数 1
回答已采纳
我有一个包含许多数据帧的列表： df1 <- data.frame(A = 1:5, B = 2:6, C = LETTERS[1:5])
df2 <- data.frame(A = 1:5, B = 2:6, C = LETTERS[1:5])
df3 <- data.frame(A = 1:5, C = LETTERS[1:5])
my_list <- list(df1, df2, df3) 我想知道这个列表中的每个数据框是否包含相同的列(即相同数量的列，所有列都具有相同的名称和相同的顺序)。 我知道您可以使用lapply很容易地在列表中找到数据框的列名 lapp
浏览 22提问于2019-06-30得票数 3
回答已采纳
1回答
我有两个数据列表。我想要创建一个函数，该函数返回DF2的索引向量，其中索引是重复的数据。我需要比较列表2中的每个df和列表1中的每个df。这段代码还需要在相同长度的列表上工作，其中列表1可能比列表2长。
例如,
library(tidyverse)
x <- mtcars %>% split(.$cyl)
y <- x[1:2]
y[[3]] <- mtcars[1:5,1:6]
x[[4]] <- x[[1]]
x[[5]] <- x[[2]]
identical(x[[1]],y[[1]]) #returns true
identical(x[[3]],
浏览 1提问于2021-02-18得票数 2
回答已采纳
1回答
我想从csv文件中读取同义词，其中第一个单词是“主”字，而同一记录中的其余单词是同义词。
现在我基本上想要创建一个列表，就像我在R中做的那样，
**synonyms <- list(
list(word="ss", syns=c("yy","yyss")),
list(word="ser", syns=c("sert","sertyy","serty"))
)**
这给了我一个清单
synonyms
[[1]]
[[1]]$word
[1] "ss"
浏览 1提问于2017-06-28得票数 0
回答已采纳
我在R中有一个名为Cell.Arrangement的列表，其中包含9种不同的单元格排列类型。我试图将这些排列替换为数字1-9，同时为了通过神经网络对它们进行拟合，但我需要保持数字对应的索引，以便可以读取输出。
列表的前几个元素如下所示：
[[1]]
[1] "Chains" "Pairs" "Singles"
[[2]]
character(0)
[[3]]
character(0)
[[4]]
character(0)
[[5]]
[1] "Singles"
[[6]]
[1] "Tetrad"
浏览 3提问于2017-01-31得票数 0
回答已采纳
我在R中有一个关于列表的问题，我在16个列表中有一个列表，其中包含了这样的变量：
x
[[1]]
A 1 3
B 4 2
[[2]]
C 23 4
D 9 22
E 4 54
A、B、C和D是列表中的行名。现在，我希望创建一个文件，该文件仅将行名粘贴到dataframe中。dataframe中的每一行在总列表中包含一个列表。
A B
C D E
有人能帮我吗？我想可能有些像do.call(rbind，rowname(X))之类的东西
编辑！05-08-2011
是否有办法按列表保存行名列表？最后，数据中没有NA，数据是不相等的？
谢谢大家！
浏览 2提问于2011-08-03得票数 1
回答已采纳
1回答
我有一个要从中提取数据的列表(mydata$note)。代码看起来像这样，如果我想提取"location“-这很好用。
location <- unlist (lapply(mydata$notes, function(e) e$location))
现在，我可能有更多的变量想要提取，比方说一个20的向量，"location"，"var1"，"var2"，"var3“等等，在一个原子向量中
names(unlist(mytree$notes[[1]]))
我如何循环我的第一个代码来提取这个名字中给出的所有变量？
干杯
浏览 0提问于2016-04-08得票数 1
1回答
Map函数弄乱了R中函数的结果
、、、、
我正在运行一个我在R中创建的名为getweather的函数，该函数有三个输入：
getweather(siteNumber,datatype,path_out)
> dput(siteNumber)
c("GHCND:USC00023498", "GHCND:USC00023498", "GHCND:USC00023505")
> dput(datatype)
"PRCP"
> dput(path_out)
"C:/Users/Hydro/Precipitation/Data/Daily/"
该函
浏览 3提问于2021-05-24得票数 0
我有一些列表： my_list1 <- list("data" = list(c("a", "b", "c")), "meta" = list(c("a", "b")))
my_list2 <- list("data" = list(c("x", "y", "z")), "meta" = list(c("x", "y"))) 我希望能够对这些列表执行一些操作，
浏览 12提问于2019-03-11得票数 1
回答已采纳
我一直试图在列中搜索特定的模式。我的模式是一个相当大的单词列表(>2000)，屏幕上的列有数百万行(df$列1)
我使用来自不同数据帧的列创建了我的模式
word<-df2$words_to_use
pattern<-paste0('.*',word,'.*', collapse ='|')
所以我的模式看起来(>2000字)：
.* word1.* | .* word2.* | .* word3.* | .* word4.*
我想在df中创建一个Y/N列，表示df$列1是否包含模式中的任何单词。
去做我用过的
df$c
浏览 0提问于2020-09-03得票数 1
回答已采纳
当我创建该列表并使用“”运算符调用该列表时，我得到了以下结果
x <- list(a=1:5, b=rnorm(5))
lapply(x[1], mean)
$a
[1] 3
lapply(x[2], sum)
$b
[1] 0.3653843
但是当我使用$ sign调用相同的列表时，我得到了不同的结果
> x <- list(a=1:5, b=rnorm(5))
> lapply(x$a, mean)
[[1]]
[1] 1
[[2]]
[1] 2
[[3]]
[1] 3
[[4]]
[1] 4
[[5]]
[1] 5
> lapply(x$b, s
浏览 1提问于2014-07-24得票数 0
我有一个有四列的数据框:两列表示参加了一项运动，而另外两列表示球员是否通过了两次体能考试。
dat <- data.frame(SOCCER = sample(0:1, 10, replace = T),
BASEBALL = sample(0:1, 10, replace = T),
TEST_1_PASS = sample(0:1, 10, replace = T),
TEST_2_PASS = sample(0:1, 10, replace = T))
我想要一份清单，其中包
浏览 1提问于2020-02-07得票数 1
1回答
假设我有一个函数，它接受参数向量，并返回结果向量(长度相同)。假设我想调用这个函数100次，总是使用相同的参数--一个长为1的100个元素向量--理想的结果是得到一个向量列表。
我想到的第一件事是使用lapply，特别是在向量列表上调用lapply。我对较小数据的测试证明，它应该工作，并以所需的格式返回数据。问题是，我无法生成作为参数所需的向量列表。
我在网上找到的只是如何生成一个向量，这对我没有多大帮助，因为我已经知道如何去做了。问题是如何从这些向量中生成一个列表，(using list(rep(1, 100), rep(1, 100), ...)是没有问题的，因为我必须重复rep(1, 1
浏览 2提问于2016-01-29得票数 0
回答已采纳
我不知道这是否真的可行，但我需要找到一个解决这个问题的办法。我将几个数据存储在由以下内容生成的列表中：
SSE <- list()
for (i in cms){
SSE[[paste0("SE",i)]] <- subset(DF, DF$X == i)
}
其中cms是存储我需要的DF$X值的向量。因此，我最终得到了一个列表SSE，例如，我可以在SSE["SE1"]中使用许多数据格式。
现在我的问题是，我想要使用所有的数据文件都是SSE在另一个for循环上，我不知道如何调用这些数据。这是我想要做的一个简单的例子：
for (i in cms)
浏览 7提问于2022-11-26得票数 0
回答已采纳
2回答
我有一个矩阵，我想要创建一个列表，其中选定的行是列表元素。
例如，这是我的矩阵
my.matrix=matrix(1:100, nrow=20)
我希望从这个矩阵创建一个列表，这样这个列表中的每个元素都是矩阵的一部分，并且每个部分的行索引由
my.n=c(1,2,4,3,5,5)
其中my.n给出了应该从my.matrix中提取的行数。my.n[1]=1表示第1行；my.n[2]=2表示第2、3行；my.n[3]=4表示第4行至第7行，依此类推。
所以我列出的第一个元素应该是
my.matrix[1,]
第二
my.matrix[2:3,]
诸若此类。
如何以优雅的方式做这件事？
浏览 6提问于2015-08-05得票数 4
回答已采纳
我有一个data.frame和一个观察列表
和观察时间的列表
我想从数据帧的每一列和观察时间创建一个线性回归线斜率的列表。
如果我是手工做的话，我会做的：
raw_slope <- lm(评分1美元AKR~ obs)
斜率<- raw_slope$coefficients[2]
然后“斜率”就是我想要的价值。我正在努力理解如何运行一些东西，并为我的data.frame中的19个公司符号中的每一个列出坡度。
我是R的新手，但我正在努力学习，我很感激任何帮助我朝着正确的方向前进。
EDIT2:我手动运行了lm(分数1$.~ obs)，这样我就知道计算结果应该都算出来了。
编辑:
浏览 1提问于2013-11-06得票数 0
回答已采纳
我有以下四个向量：
A <- c(5, 5, 5, 5, 5, 5, 5)
B <- c(6, 6, 6)
C <- c(7, 7, 7, 7)
D <- c(8, 8, 8, 8)
最后，我想把这个向量列表(这里有4个向量)转换为，所有的完全向量(即不分裂单个向量)的成对组合，而级联向量的最小长度为7。因此，一个可能的解决办法是：
s1 <- c(5, 5, 5, 5, 5, 5, 5, 6, 6, 6)
s2 <- c(7, 7, 7, 7, 8, 8, 8, 8)
我该怎么做？
浏览 1提问于2017-08-29得票数 3
回答已采纳
1回答
我有一个关于在列表的每个元素上应用函数的问题。
这就是我的问题：
我有一个DF列表(我用更大的DF除以天数)：
mydf <- data.frame(x=c(1:5), y=c(21:25),z=rnorm(1:5))
mylist <- rep(list(mydf),5)
names(mylist) <-c("2006-01-01","2006-01-02","2006-01-03","2006-01-04","2006-01-05")
如果数据是相同的，请不要关心这个假数据)，这只是示
浏览 0提问于2012-08-28得票数 2
回答已采纳
1回答
我在R中有多个列表，每个列表都有唯一的元素，但有些元素在多个列表中。我想打乱列表，但也要让每个列表只有唯一的元素。这里有一些东西，但在最后并没有得到唯一的列表
x<-list()
x[[1]]<-c(1,2,3,4,5)
x[[2]]<-c(1,2,6,7,8)
u<-unlist(x)
x2<-relist(u[sample(length(u))],skeleton=x)
> x
[[1]]
[1] 1 2 3 4 5
[[2]]
[1] 1 2 6 7 8
> x2
[[1]]
[1] 4 8 3 5 6
[[2]]
[1] 2 1 2
浏览 2提问于2016-10-25得票数 0
1回答
我有一个大列表，我想在每个列表中删除重复的元素。示例：
x <- list(c("A", "A", "B", "C"), c("O", "C", "A", "Z", "O"))
x
[[1]]
[1] "A" "A" "B" "C"
[[2]]
[1] "O" "C" "A" "Z" "O"
我希
浏览 0提问于2020-04-09得票数 2
回答已采纳
1回答
my_function <- function(n){}
result = list()
for(i in 0:59){
result[i] = my_function(i)
}
write.csv(result, "result.csv")
对于R来说，读一读for-循环在R中是不好的，那么，除了我正在做的事情之外，还有其他的选择吗？基本上，我试图使用一个参数来调用my_function，然后将结果写入一个文件。
编辑对不起--我没有指定使用I的某些函数作为my_function的参数，例如12 + (22*i)。我是否应该创建一个值列表，然后使用该值列表调用
浏览 5提问于2017-11-28得票数 0
2回答
您好，在R中创建一个列表文件，然后我使用write.table()将其保存到file.txt。
现在，我想在R中导入file.txt，但我在这样做时遇到了问题。
file.txt中的列表如下所示(使用Notes of Windows打开它)。
"1" c(133, 292, 460, 603, 762, 929, 1027, 1060, 1199, 1373, 1523, 1698, 1875)
"2" c(145, 322, 475, 654, 790, 922, 1085, 1251, 1411, 1451, 1562, 1737, 1861)
"3
浏览 0提问于2016-07-28得票数 0
2回答
我有一份清单：
lst
lst <- list(a=c(2.5,9.8,5.0,6.7,6.5,5.2,34.4, 4.2,39.5, 1.3,0.0,0.0,4.1,0.0,0.0,25.5,196.5, 0.0,104.2,0.0,0.0,0.0,0.0,0.0),b=c(147.4,122.9,110.2,142.3))
我想为一个列表的每个值和一个列表的每个元素(a和b)计算一个z.score为：(x[i]-mean(x)/sd(x)，其中x是列表中每个元素的所有值(togheter)，而xi是每个list元素的每个单独的组件。我和lapply试过
lapply(lst,fun
浏览 0提问于2018-12-03得票数 2
回答已采纳
假设我有一个栅格对象r (或一个数据帧，因为它们可以被类似地索引)，以及一个字符列表v： v <- c("X15_X14","X15_X10","X13_X10") 我的对象"r“的名称/波段是"X1”、"X2“、...、"X14”、"X15“ 我可以使用r[15]、gsub和粘贴(或任何其他函数)的哪种组合来创建一个简单的数学运算，其中列表中的"X15_X14“变成r$X15/r$X14或r[15]/r[14]？ 我想使用我自动生成的列表"v“来选择要进行除法的频带/列。我有许多模
浏览 12提问于2020-04-01得票数 1
回答已采纳
2回答
返回列表值的控件流。
、、、
我试图返回一个给定这个函数的值列表：
Pass_or_fail <- function(y){
x = round(runif(y, 0, 100), 1)
if(x>50){
list(print("Passed"))
}else if(x < 50){
list(print("Failed"))
}
}
当我将一个值传递给y (例如，20 )时，应该返回一个Passed或Failed字符的列表。然而，上面的函数只返回一个向量。我希望它返回与上述条件相关的20个值，主要是列表格式。
我正在考虑创建一个变量like
浏览 3提问于2021-02-01得票数 0
回答已采纳
1回答
我有几个包含向量的列表，我想得到一个列表，其中的元素是初始列表的向量的平均向量。
示例:两个初始列表
lt1 <- list(a = c(1,2,3), b = c(2,5,10))
lt2 <- list(a = c(3,4,5), b = c(4,5,2))
我想要得到
lt12 <- list(a = c(2,3,4), b = c(3,5,6))
我试着用lapply和llply，但最后总是得到每个列表的向量的平均值。
浏览 1提问于2015-09-09得票数 5
回答已采纳
我有一个包含100个列表的列表，每个列表都有552个数值。如何从100个列表中依次提取第一个值(以此类推至552)？
示例:包含数字1-10的列表中的5个列表。
list(c(1, 2, 3, 4, 5, 6, 7, 8, 9, 10), c(1, 2, 3, 4, 5, 6, 7,
8, 9, 10), c(1, 2, 3, 4, 5, 6, 7, 8, 9, 10), c(1, 2, 3, 4, 5,
6, 7, 8, 9, 10), c(1, 2, 3, 4, 5, 6, 7, 8, 9, 10))
我想依次提取每个词，即1，1，1，1，然后2,2,2,2,2，2，等等。
浏览 3提问于2014-01-20得票数 1
回答已采纳
1回答
日期重叠的10天间隔
、、、
我有一个年度数据集，我想将其分成10天的间隔。例如，我想将2010-12-26子集设置为2011-01-04，使用这些日期的x和y值创建一个home range，然后获得接下来的9天加上子集数据之间的重叠日期，在本例中为2011-01-04 (2011-01-04 to 2011-01-13)。有什么好方法可以做到这一点吗？ library(lubridate)
date <- rep_len(seq(dmy("26-12-2010"), dmy("20-01-2011"), by = "days"), 500)
df <- dat
浏览 3提问于2021-04-22得票数 0
回答已采纳
2回答
我有一个html文件的列表，我已经从网络上提取了一些文本，并让它们与read_html一起阅读。
我的文件名是：
a1 <- read_html(link of the text)
a2 <- read_html(link of the text)
.
.
. ## until:
a100 <- read_html(link of the text)
我试着用这些创建一个语料库。
我该怎么做呢？
谢谢。
浏览 0提问于2018-11-20得票数 0
回答已采纳
我有一个列表，如ll
ll <- list(a = list(data.frame(c = 1, d = 2), data.frame(h = 3, j = 4)), b = list(data.frame(c = 5, d = 6), data.frame(h = 7, j = 9)))
我想在每个最终列表中添加一个变量grp。这个变量(grp)必须包含每个列表的名称/值。因此，新的列表列表可能类似于ls。
ls <- list(a = list(data.frame(c = 1, d = 2, grp = 1), data.frame(h = 3, j = 4, grp = 2
浏览 4提问于2021-12-03得票数 1
回答已采纳
是否有一个库将接收文档列表并集体计算距离的nxn矩阵--其中提供了word2vec模型？我可以看到，天才主义允许您在两个文档之间进行此操作--但我需要在所有文档之间进行快速比较。就像滑雪的cosine_similarity。
浏览 3提问于2017-06-06得票数 3
回答已采纳
我有一个函数，它需要一个S4对象和一个数据框作为参数。
但是像lapply和llply这样的函数只允许一个列表和一个函数。示例：new_list=llply(list, function)
我可以用交替的S4对象和数据创建一个列表，但是llply会一次推入一个列表项，这意味着它要么是S4对象，要么是数据(该函数不能只使用其中的一个来执行)。
在某种意义上，我正在寻找的东西类似于2D列表(其中每一行都有S4 obj和数据，并且一次推入一行)。
那么我该怎么做呢？
这是我的问题的一个更一般的版本。如果我有一个这样的函数：
foobar <- function(dat, threshold=0
浏览 3提问于2010-09-24得票数 1
1回答
我有这样的事务性数据
library(data.table)
library(stringr)
sample <- data.table (customerid=c(1,1,2,2,2,3,4,4,5,5,6,6,6,7,7),
product=c("A","A+B","A","A+B+C","A+C","B","B+C+D","C+D","A+D","A+B+D","A+B"
浏览 4提问于2021-04-29得票数 1
回答已采纳
--我不确定我是否理解这两种场景中的不同输出：
(1)
pioneers <- c("GAUSS:1777", "BAYES:1702", "PASCAL:1623", "PEARSON:1857")
split <- strsplit(pioneers, split = ":")
split
(2)
pioneers <- c("GAUSS:1777", "BAYES:1702", "PASCAL:1623", "PEARSON:18
浏览 3提问于2015-09-14得票数 0
2回答
假设我有一个R函数：
x <- function(x) {
x <- substr(x, 1, 1)
return(x)
}
如果我跑了
x(abc)
我会得到
[1] "a"
为了允许我的函数运行一个列表，即a = list('aas', 'cvs', 'mmm')
我可以使用'lapply‘函数
lapply(a, x)
但是，如何将lapply()函数合并到我的函数中，以便允许我的函数直接运行列表？
即：
x(a)
浏览 1提问于2018-03-15得票数 0
回答已采纳
我正在尝试用ggplot为20个数据框("df1“- "df20")创建绘图，这些数据框包含在一个名为"list1”的列表中。该列表如下所示： list1 <- list(df1, df2, ..., df20) 每个数据框都有两列z和y，我想将它们相互对比： df1
z y
1 6
2 9
3 7 我已经创建了以下代码，该代码也可以工作，但它没有提供从df1到df20的各自标题的绘图： lapply(list1, function(x)
ggplot(data = list1$x) +
geom_line(mapping = a
浏览 23提问于2019-05-08得票数 0
回答已采纳
3回答
我试图创建一个列表1000个条目，其中每个条目的列表随机向量。在这种情况下，向量应该是从整数1到100中选择的10个整数。我想避免在循环中这样做。
如果运行以下命令，则不会再次进行采样，但只会在列表的所有1000个条目中复制该示例：
list.of.samples <- rep(list(sample(1:100,size=10)),1000)
有没有一种简单的方法，我错过了矢量法生成这1000个样本并将它们存储在一个列表中？
浏览 2提问于2014-02-04得票数 7
回答已采纳
我有一个列表，listDFs，其中每个元素都是一个数据框架。每个数据帧有不同的行数和相同的列数。
我应该从listDFs[i]$Name开始创建一个向量，从列表中提取所有的i元素。
我想用一个循环：
vComposti <- c()
for(j in 1:10){vComposti <- c(listDFs[[j]]$Name)}
但是结果是一个只包含列表的第一级(listDFs[1]，$Name)的向量。
我哪里错了？你有什么建议吗？
浏览 3提问于2011-11-19得票数 1
回答已采纳
这应该很容易，但谷歌和我都失败了。假设我有这些数据：
library(data.table)
mydata <- data.table(a = c(1, NA),
b = c(NA, NA),
pointer = c(1,2))
我想得到a和b都是NA的行。当然，我可以手动这样做，比如：
mydata[is.na(a) & is.na(b)]
但是在其他代码中出现了这个问题，我想根据列名的字符向量(或者列表，或者其他什么，这是灵活的)来实现这个问题，比如：
myvector <- c(&#
浏览 3提问于2021-04-20得票数 1
回答已采纳
1回答
我用 ()有几百个文件名。当我使用list.files()函数时，我无法让R读取或打开这些文件，因为R将文件名与“合并Diacritical”(如\u301和\u308 )分别转换为\xb4和\xa8。结果是一个系统找不到的不同的文件名。你如何阻止R替换这些字符？
在文件名列表上应用gsub()函数，以组合的尖锐重音替换单独的急性重音(即，filenames <- gsub("A´", "Á", filenames)将“A‘”更改为单个unicode字符“́”，而不是双unicode字符"Á“，这不是一回事，因此系统无法找到具有该名称的文件。(
浏览 4提问于2017-09-27得票数 1
回答已采纳
我有一个由244个数据帧组成的列表，如下所示:列表的名称是datas。
datas[[1]]
year sal
2000 10000
2000 15000
2005 10000
2005 9000
2005 12000
2010 15000
2010 12000
2010 20000
2013 25000
2013 15000
2015 20000
我想创建一个名为fix.sal的新专栏，将不同的值相乘到不同的年份。例如，我在与2000相同行的sals上乘2。同样，sal值乘以2005年为1.8个，2010年为1.5个，2013年为1.2个，2015年为1个。结果应该是这样的：
Year
浏览 3提问于2016-11-01得票数 0
回答已采纳
我有一个字符串值列表。
c("String1","String2","String3")
如何创建循环或使用将列表值添加到我希望将其添加到的代码区域？
DataFrame_String1<- DataFrame %>%
filter(.,ID=="String1")
DataFrame_String2<- DataFrame %>%
filter(.,ID=="String2")
DataFrame_String3<- DataFrame %>%
fi
浏览 7提问于2022-04-26得票数 1
回答已采纳
1回答
我有一个从ESPN检索游戏数据的函数。这只需要一个论点。需要一种方法来创建一个游戏ids列表，该函数可以循环。我们将调用函数的名称"get_data“。
该函数适用于单个游戏。
get_data(1000001)
但如果我有多个游戏存储在一个列表中..。我怎么才能在一个电话里翻过它们呢？
game_ids <- c("1000001", "1000002", "1000003")
get_data(game_ids)
浏览 1提问于2021-11-29得票数 2
回答已采纳
1回答
我有一个名称列表和一个包含许多不同列的data.frame。如何检索数据框中的行，使其row.name是我列表中的名称之一？
例如，如果我的数据框中的row.names有许多行，包括TC09001536.hg.1、TC03002852.hg.1和TC18000664.hg.1名称，这些名称保存在名为Top.list的列表中。假设我的数据帧名为df，然后我尝试：
test <- df[grep(Top.list, df$cluster_id),]
要在cluster_id列中查找，如果与列表中的名称匹配，则给我整行。
浏览 6提问于2017-03-07得票数 0
回答已采纳
我正在寻找一种方法来验证多个字符向量之间的任何两个字符向量是否完全相关，这意味着对于一个向量的每个可能值，另一个向量中的对应值总是相同的，如下例所示：
a <- c("A", "A", "A", "A", "B", "C", "D", "D")
b <- c("w", "w", "w", "w", "5", "x", "2", "2
浏览 4提问于2017-06-28得票数 2
回答已采纳
我有一个非对称列表，即每个子列表中的元素数量不同。如何将列表转换为矩阵？
下面我从一个对称列表开始，用两种不同的方法将它转换成一个矩阵。
# create a symmetric list
my.list1 <- list(c(1,2,3,4),c(5,6,7,8),c(9,10,11,12))
my.list1
# convert symmetric list to a matrix
mat.a1 <- matrix( unlist(my.list1), nrow=length(my.list1), byrow=T )
mat.a1
# alternative m
浏览 0提问于2012-06-22得票数 5
回答已采纳
扫码
添加站长 进交流群
领取专属 10元无门槛券
手把手带您无忧上云
相关资讯
热门标签
云服务器
ICP备案
对象存储
即时通信 IM
腾讯会议活动推荐
腾讯云开发者
