如何获取data.frames列表中特定data.frame的索引？
在R语言中，可以使用以下方法获取data.frames列表中特定data.frame的索引：
- 使用for循环遍历data.frames列表，逐个比较每个data.frame是否与目标data.frame相等，如果相等则返回索引值。
get_dataframe_index <- function(dataframes, target_df) {
for (i in seq_along(dataframes)) {
if (identical(dataframes[[i]], target_df)) {
return(i)
}
}
return(NULL)
}- 使用lapply函数遍历data.frames列表，对每个data.frame进行比较，返回与目标data.frame相等的索引值。
get_dataframe_index <- function(dataframes, target_df) {
index <- which(lapply(dataframes, identical, target_df))
if (length(index) > 0) {
return(index)
} else {
return(NULL)
}
}使用示例：
# 创建data.frames列表
df1 <- data.frame(a = 1:3, b = letters[1:3])
df2 <- data.frame(x = 4:6, y = letters[4:6])
df3 <- data.frame(m = 7:9, n = letters[7:9])
dataframes <- list(df1, df2, df3)
# 获取特定data.frame的索引
target_df <- data.frame(x = 4:6, y = letters[4:6])
index <- get_dataframe_index(dataframes, target_df)
print(index)输出结果为：
[1] 2这表示目标data.frame在data.frames列表中的索引为2。
相关·内容
我一直在试验R中的XBRL包，试图编写一个函数来循环公司和输出财务报表，最好是在一个非常标准的数据格式中。但是，我不明白输出。使用该函数，然后查看数据框架，所显示的只是最左边列上的运行总量，右边是各种XML/XBRL/C++组件的对齐URL。我承认我对XBRL知之甚少，但我肯定遗漏了什么。我将如何使用这个包的函数循环并记录所有XBRL语句，格式化为对最终用户有用的东西？
使用pdf指南中的示例很容易，但它奇怪地打印出来，我不知道如何将它放入适当的数据框架中：
## Setting stringsAsFactors = FALSE is highly recommended
## to avoi
浏览 2提问于2014-03-27得票数 1
1回答
我有一个数据帧列表：
d1<-data.frame(a=rnorm(5), b=rep(2006, times=5), cc=c(1:5))
d2<-data.frame(a=rnorm(5), b=rep(2007, times=5), cc=c(1:5))
d3<-data.frame(a=rnorm(5), b=c(2005:2009), cc=c(1:5)) #data frame with only one 2007 value
d4<-data.frame(a=rnorm(5), b=rep(2007, times=5), cc=c(1:5))
my
浏览 0提问于2016-03-01得票数 2
回答已采纳
1回答
我刚开始在R中使用列表，并试图在各种数据帧上运行一个循环，为每个帧存储多个模型。我希望列表的第一个索引中对应于给定数据框架的模型；例如[i]，[i]。下面的示例覆盖列表：
f1 <- data.frame(x = seq(1:6), y = sample(1:100, 6, replace = TRUE), z = rnorm(6))
f2 <- data.frame(x = seq(6,11), y = sample(1:100, 6, replace = TRUE), z = rnorm(6))
data.frames <- list(f1,f2)
fit <-
浏览 5提问于2015-02-02得票数 1
回答已采纳
在存在重复的多个列表中有data.frame对象。但是，我打算在没有重复的情况下将这些data.frame对象组合成一个列表。我尝试了几种方法来获得预期的输出，但无法找到如何将data.frame对象组合到多个列表中。因为在每个列表中，data.frame对象的顺序是非常不同的。有人知道容易做这种操作的窍门吗？怎样才能让这一切发生？知道吗？提前谢谢。
这是一个快速可复制的运行示例：
小例子：
myList_1 <- list(
foo = data.frame(from=c(2,7,11,19), to=c(5,10,14,24), label=c("a1","
浏览 1提问于2016-10-07得票数 1
回答已采纳
我正在努力弄清楚如何聚合和合并数据帧列表。有人这么做过吗？
下面是示例。我有一个通过对分类变量进行拆分而创建的数据帧列表。
list1df 93 obs of 6 variables:
- categoricalvar1: Factor w...
- categoricalvar2: Factor w...
- categoricalvar3: Factor w...
- numericvar1: num...
- numericvar2: num...
- thedate: Date, format "2018-11-13"...
list2df 3988 obs of 6
浏览 0提问于2018-12-20得票数 1
1回答
我想了解如何通过从列表中提取数据来更快地创建数据框架。特别是，我有一个有不同长度的40个元素的列表。我正在用这个方法，但它真的很慢。
data1 <- output_list[1] %>% data.frame()
data2 <- output_list[2] %>% data.frame()
data3 <- output_list[3] %>% data.frame()
data4 <- output_list[4] %>% data.frame()
data5 <- output_list[5] %>% data.frame(
浏览 2提问于2021-04-14得票数 0
回答已采纳
可能重复：
我混淆了数据类型的1，1，，1，[1]的区别。
如我所知，1将获取matrix的第一行,1将获取第一列。[1]将获取list的第一个元素。
但是我查了data.frame的文件，上面写着
数据帧是具有唯一行名的相同行数的变量列表。
然后我输入了一些代码来测试使用情况。
>L3 <- LETTERS[1:3]
>(d <- data.frame(cbind(x=1, y=1:10), fac=sample(L3, 10, replace=TRUE)))
x y fac
1 1 1 C
2 1 2 B
3 1 3 C
4
浏览 3提问于2012-06-04得票数 2
回答已采纳
3回答
我试图使列表中的所有数据文件都有相同的列数。
创建一个包含3个数据的列表，但是第二个列有一个额外的列。
my_data<-
list( data.frame(
V1= c(1,1,1,1,1),
V2= c(2,2,2,2,2),
V3= c(3,3,3,3,3),
V4= c(4,4,4,4,4),
V5= c(5,5,5,5,5)),
data.frame(
V1= c(1,1,1,1,1),
V2= c(2,2
浏览 9提问于2022-06-09得票数 1
回答已采纳
2回答
我应用机器学习算法和插入程序包(caretlist)根据多个变量(例如年龄、性别、吸烟者等)预测一组患者的死亡： algorithmList <- c('rf', 'pls','parRF','nnet', 'xgbTree','avNNet',
'gbm','monmlp','nb','glm','pcaNNet','lda','C5.0'
浏览 44提问于2021-08-31得票数 0
2回答
我从R开始，所以我不太擅长为我的问题寻找相关的答案。如果有人提出类似的问题，我很抱歉。
我有一个由数据帧和列表组成的列表。我想知道如何只保留数据帧，以便将它们绑定在一起以在巨大的数据框架上生成。
这里我举一个例子：
L1 <- list(c(1, "abc", 3))
L2 <- list(c("b","d"))
L3 <- list(L1,L2)
brand <- c("A","B","C","D")
price <- c(1,1,3,7
浏览 0提问于2018-02-28得票数 0
回答已采纳
在使用RCurl进行web扫描之后，我使用了XML的readHTMLTable，现在有了包含40个两个变量的40个观测结果的100个数据格式列表。我想将其转换为由100行和40列组成的单个数据格式。每个数据文件中的第一列包含了我希望在单个数据格式中成为列名的内容。这是我所能得到的一个MWE (我的实际列表中的每个数据文件都被命名为NULL)：
description <- c("name", "location", "age")
value <- c("mike", "florida", "25
浏览 1提问于2013-09-05得票数 0
回答已采纳
2回答
我有一个数据帧列表，我想创建一个字符矢量，其中包含满足特定条件的数据帧名称。在这种情况下，我想要包含至少一个观察值的数据框的名称。我需要将这些名称放在一个向量中，以便稍后在另一个函数中使用。
数据框列表由拆分功能自动创建。为了提高可重复性，以下是数据帧列表：
df1 <- data.frame(replicate(2,sample(0:1,5,rep=TRUE)))
df2 <- data.frame(replicate(2,sample(0:1,5,rep=TRUE)))
df3 <- data.frame(replicate(0,sample(0:1,5,rep=TRUE
浏览 8提问于2017-07-06得票数 6
回答已采纳
1回答
你好亲爱的社区
继之后，
我正在搜索如何从包含多个名为的子列表的列表中创建多个数据帧。
因此，从一个名为tier.col的列表中，我想创建一个函数tier2col，它返回到多个data.frames (就像我的列表中有子列表一样多)，其中包含子列表的特定元素。
我知道如何手动这样做：
phones <- data.frame(tier.col$phones$xmin[-1,3], tier.col$phones$xmax[-1,3], tier.col$phones$text[3])
但实际上，“电话”在多个名称中发生了变化，因此我需要一种更通用的子列表方法：
x <- data.
浏览 1提问于2014-02-27得票数 0
回答已采纳
人们常说，data.frame是从list继承而来的，考虑到访问data.frame列($、sapply等)的许多常见范例，这是有意义的。
然而，"list"不在data.frame对象的类列表中返回的项中：
dat <- data.frame(x=runif(100),y=runif(100),z=runif(100),g=as.factor(rep(letters[1:10],10)))
> class(dat)
[1] "data.frame"
取消对data.frame的分类显示它是一个列表：
> class(unclass(dat))
浏览 4提问于2013-10-26得票数 9
假设我有一个名为reference data.frame的a。我想知道如何自动添加a中存在但在其他data.frames、b和d中缺失的变量。
注意:我的目标是利用这个函数，使任意数量的data.frames和任意数量的变量都可以基于单个引用 data.frame完成。
a <- data.frame(x = 2:3, y = 4:5, z = c(T, F)) ## reference data.frame
b <- data.frame(x = 6:7) ## Add y and z here
d <- data.frame(x = 7:8) ## Add y and
浏览 0提问于2019-06-02得票数 0
回答已采纳
这应该是显而易见的，但我仍然没有对lapply及其亲属有任何想法，我也没有在SO或Google上找到一个清晰简单的答案。因此，在为贵族道歉时，下面是这样说的：
我有一个包含多个嵌入的列表，有点像这样(从获取一个可重复的示例)：
lst <- structure(list(Df1 = structure(list(Df1 = structure(list(Date = structure(c(14611, 14612), class = "Date"), Ta_200 = c(10.0067787761421, 5.9095282339839 )), .Names = c(
浏览 0提问于2016-04-14得票数 1
回答已采纳
我有一个相对较大的data.frame，有205K的观察值和54个变量。此data.frame是附加三个不同data.frames的结果。原始data.frames都有date、time、lat和lon列，但是每个data.frame都包含我需要保留的附件信息。因此，在最终的data.frame中，我有三行组成的集合，其中日期、时间、时间、纬度完全相同，但var1、var2等的值不同，有些是NA。我的data.frame的简化版本可能如下所示：
mydf
var1 date time var2 var3 var4 var5 var6 lat lon
1 A 1 2
浏览 14提问于2020-11-13得票数 0
2回答
我有一个dataframes (df1)列表和另一个dataframes (df2)列表，它们保存着在第一个列表中找到‘最近值’所需的值。
df1<-list(d1=data.frame(y=1:10), d2=data.frame(y=3:20))
df2<-list(d3=data.frame(y=2),d4=data.frame(y=4))
假设我有这个功能：
df1[[1]]$y[which(abs(df1[[1]]$y-df2[[1]])== min(abs(df1[[1]]$y-df2[[1]])))]
该函数在寻找df2值1在df1中最接近的值时工作得很好。我无法实现
浏览 1提问于2016-03-09得票数 0
回答已采纳
2回答
我有7个实验数据，每个数据被细分为15个重复(或迭代)。我现在对所有的105变量x感兴趣，以便在后面的分析中进行计算。
假设您有以下带有随机数的数据，为了简单起见，假设所有数据都包含不同的数字：
set.seed(2)
a <- runif(100, -1.5, 1.5)
b <- pnorm(rnorm(100))
c <- rnorm(100)
d <- rnorm(100)
e <- dnorm(rnorm(100))
iteration <- sort(sample(1:7, 100, replace=T), decreasing=F)
x <
浏览 2提问于2015-07-20得票数 1
回答已采纳
有两个数据集，A& B，如下：
A <- data.frame(TICKER=c("00EY","00EY","00EY","00EY","00EY"),
CUSIP=c(NA,NA,"48205A10","48205A10","48205A10"),
OFTIC=c(NA,NA,"JUNO","JUNO","JUNO"),
浏览 3提问于2017-08-14得票数 0
回答已采纳
1回答
我正在尝试弄清楚如何使用python将文件从XML文件解析为数据结构，然后再传递给R。
我需要在R中创建的是数据帧列表的列表：
Nodes = data.frame()
Edges = data.frame()
NetworkCompListA = list()
NetworkCompListA[['Nodes']] = Nodes
NetworkCompListA[['Edges']] = Edges
Networks = list()
Networks[['NetA']] = NetworkCompListA
Networks[['
浏览 3提问于2013-01-31得票数 2
回答已采纳
假设我从一个数据帧开始。我想在每一行上执行一个函数。该函数将该行的多列作为参数。我希望最终结果是一个数据帧列表，其中每个数据帧对应于原始数据帧的一行。我该怎么做呢？我对tidyverse中的各种apply函数和其他一些函数感到困惑。 下面是一个示例： 我从这个数据帧开始： a <- data.frame(a= c(1,2), b=c(2,3), c=c(0,0)) 我想执行一个简单地将列a、b和c相加的函数。输出就是结果，其中每一行的总和包含在一个数据帧中。数据帧的名称应与行号相对应。 b <- list(r1=data.frame(3), r2=data.frame(5))
浏览 26提问于2021-09-03得票数 0
回答已采纳
1回答
我有一个这样的列表
A <- data.frame(a = c(1, 2), b = c(3, 4))
B <- data.frame(c = c(1, 2), d = c(3, 4))
g <- list(var1 = A, var2 = B)
生产
> g
$var1
a b
1 1 3
2 2 4
$var2
c d
1 1 3
2 2 4
现在我想转置列表元素，如下所示
lapply(g, function(x) data.frame(t(x)))
但是这会产生a，b，c，d作为行名，这不是我想要的
> lapply(g, function(x)
浏览 0提问于2012-05-30得票数 0
回答已采纳
我正在读取几个.shp文件，我想在最后将它们合并(绑定行)到一个sf数据帧中。我尝试了几种方法，但结果不是sf数据格式，几何单元格是列表格式的。
可复制的例子：
library(tidyverse)
library(sf)
# create sample sf data frames and export them to directory: /folder/
data1 <- data.frame(attr = c(1:10), lon = c(11:20), lat = c(21:30)) %>%
st_as_sf(coords = c("lon",
浏览 0提问于2018-03-27得票数 1
回答已采纳
1回答
我在R中有一个系统树，目前的变量是taxa_names。我想从data.frame中分配taxa_names (树是基于所说的data.frame)。 matrix <- data.frame(row.names = c('aa','bb','cc'),aa=c(0,1,1),bb=c(1,1,0),cc=c(0,1,1))
> matrix
aa bb cc
aa 0 1 0
bb 1 1 1
cc 1 0 1
d.matrix <- dist(matrix)
h.matrix <- hcl
浏览 24提问于2020-08-05得票数 0
3回答
第一个代码：
样本数据：
vector1 <- data.frame("name"="a","age"=10,"gender"="m")
vector2 <- data.frame("name"="b","age"=33,"gender"="m")
vector3 <- data.frame("name"="b","age"=58,"gender"=&
浏览 2提问于2017-12-29得票数 1
回答已采纳
1回答
我试图在3个单独的数据帧中设置相同的因子级别，所以我试图通过列表和循环来更有效地实现这一点。
dlist <- list(d1, d2, d3)
for (i in 1:length(dlist)) {
dlist[[i]]$myFactor <- factor(dlist[[i]]$myFactor, levels=c("l1", "l2"))
}
这似乎会更新dlist中复制的数据帧的因子级别，但不会更新数据帧本身。如何更改d1$myFactor、d2$myFactor、d3$myFactor？
浏览 0提问于2017-09-27得票数 0
2回答
合并数据帧值
、、
我想合并两个数据帧由重叠，但单独的tsv文件。FileA是一个主列表，FileB包含主列表的一部分，但是有许多更新的校对字段。目标是更新FileA中B文件不同的字段。样本数据：
filea <-data.frame('ID'=c('555555','66532','333221','333333','545678'),
'color'=c('red','blaackk','green','green','
浏览 1提问于2016-12-11得票数 1
回答已采纳
我有多个.rData文件，其顶级全局环境变量是data.frames、lists、深度嵌套列表的混合。我知道许多嵌套列表中都有data.frame类型，但是我很难检索到它们的路径。
在使用以下代码的另一种类型的类之前，我遇到了一个类似的问题
names(rapply(mget(ls(.GlobalEnv), envir=.GlobalEnv), length, classes="fluor.spectral.data", how="unlist"))
虽然不是最优雅的解决方案，但它很快就实现了我所需要的。返回像"Fluor.Spec.WA.M12.SC.
浏览 3提问于2020-07-10得票数 1
回答已采纳
3回答
R重新绑定数据的数据
、、、
如何能够连接包含一个或多个data.frames列的数据文件。例如：
df <- data.frame(a=1:3)
df$df <- data.frame(a=1:3)
rbind( df, df)
row.names<-.data.frame中的错误(*tmp*，value = value)：
不允许重复“row.names”，此外:当设置“row.name”：‘1’、‘2’、‘3’时，警告消息:非唯一值
library(dplyr)
bind_rows(list(df,df))
错误:参数2不能是包含数据帧的列表
浏览 0提问于2019-06-22得票数 4
回答已采纳
1回答
函数遍历多个列表
、、
我不会使用那么多函数，但是当我使用的时候，我倾向于使用一个匿名函数和某种形式的apply。然而，我现在正在尝试编写一个函数来处理列表中的项。
有两个列表，每个列表都有许多项(我所说的项是指例如mylist1[1])。所有项目都是数据帧。我想获取来自mylist1的第一个数据帧和来自mylist2的第一个数据帧，并对这些数据帧中的列运行一组函数。然后取第二个mylist1项和第二个mylist2项，依此类推...
下面是我习惯写的东西，但显然在这种情况下不适用于两个列表。有没有人可以帮我找出一种快速的方法，让我知道应该如何使用sapply以外的方法来解决这个问题呢？
a <- c(1:10
浏览 3提问于2012-06-15得票数 0
回答已采纳
1回答
我在R中有一个大的数据列表，需要重新排列。我想要一个新的数据列表，其中_n_th数据的行由我当前列表中每个数据的_n_th行组成。下面是一个可复制的示例的设置：
# Generate example data
df1 = data.frame(x = c(1.3, 2.7, 3.4, 4.1),
y = c(5.6, 6.3, 7.9, 8.5),
z = c(10, 9, 13, 12))
df2 = data.frame(x = c(1.3, 2.7, 3.4, 4.1),
y =
浏览 1提问于2015-12-07得票数 1
回答已采纳
我正在导入数百个文本文件，在那里我需要清除列名。
t1 <- data.frame("A")
t2 <- data.frame(2)
names(t1) <- "COL one"
names(t2) <- "Col two"
我可以将它强制放入列表并进行应用，但随后我需要加入dataframes，并且不愿意加入到列表中。
f <- list(t1=t1,t2=t2)
f2 <- lapply(f,janitor::clean_names)
是否有一种方法可以循环遍历数据格式，应用一个函数并返回单个的data.f
浏览 3提问于2020-01-30得票数 0
回答已采纳
我知道这里有许多关于如何使用do.call或ldply将data.frames列表转换为单个data.frame的问题，但这个问题是关于理解这两种方法的内部工作原理，并试图弄清楚为什么我不能将具有相同结构、相同字段名等的近100万个df的列表连接到单个data.frame中。每个data.frame有一行和21列。
数据最初是一个JSON文件，我使用fromJSON将其转换为列表，然后运行另一个lapply来提取列表的一部分，并将其转换为data.frame，最后得到一个data.frames列表。
我试过了：
df <- do.call("rbind", list)
d
浏览 2提问于2012-03-16得票数 25
回答已采纳
2回答
我如何将向量附加到data.frames列表中？
l <- list(data.frame(a=c(1,2,3), b=c(1,2,3)), data.frame(a=c(1,2,3,4), b=c(1,2,3,4)))
l
file_name <- c("myfile.txt", "yourfile.txt")
file_name
我试过：
lapply(l, function(x) cbind(l[[x]], fname = rep(file_name, each = nrow(l[[x]]))))
但我发现了一个错误：
l[x]中的错误:无效
浏览 4提问于2017-06-29得票数 1
回答已采纳
这里是我的列表的一个例子(实际上在实际的列表中有> 2,000 df )：
df1 = read.table(text = 'a b
1 66
1 999
23 89', header = TRUE)
df2 = read.table(text = 'a b
99 61
32 99
83 19', header = TRUE)
lst = list(df1, df2)
我需要为列表中的每个data.frame创建一个新列，并使用特定的数字填充每个列。
numbers = c(100, 200)
所以我的产出应该是：
> lst
[[1]]
浏览 0提问于2017-03-15得票数 1
回答已采纳
我有下面的数据框架：
library lubridate
eventtime<-c("2020-02-07 22:06:00","2020-02-07 22:00:00","2020-02-07 21:46:00")
eventvalue<-c("home","work",'exit')
geof<-data.frame(eventtime,eventvalue)
然后，我将其所有唯一的eventvalue值收集到一个新的值中。
geoun<-data.frame(uniq
浏览 5提问于2020-03-06得票数 0
回答已采纳
1回答
我希望每10天适当地拆分数据集。日期之间的步长并不总是1:在-149 -> -147的情况下可能是2 有没有比test更聪明的方法，在days和注册begin和end索引之间的每个时间差进行拆分？ df = structure(list(day = c(-155, -153, -152, -151, -150, -149, -147,
-146, -145, -144, -143, -142, -141, -140, -139, -138, -137, -135,
-134, -131), margin = c(0.02, 0.03, 0.065, 0.06, 0.07, 0.05
浏览 18提问于2021-04-15得票数 1
回答已采纳
假设我有一个函数，它从MySQL表中读取数据，对其进行操作，然后返回一些data.frame。注意，该函数只是一个示例，其功能本身并不重要...，例如：
addRowSd <- function(table,con,pattern="^Variable") {
dframe <- dbReadTable(con,table)
cn <- colnames(dframe)
qs <- subset(x, x %in% grep(pattern, x, value=TRUE))
dframe$qsd <- sd(t(dframe[,c(qs)]))
浏览 0提问于2010-10-28得票数 7
回答已采纳
我在嵌套列表中设置了data.frame对象，我想按data.frame对象的名称对它们进行分组。因为每个嵌套列表、data.frame对象都是以不同的顺序放置的，所以我很难将它们分组到新列表中。我尝试了CRAN中的purr包中的转置方法，但它不是我期望的正确答案。有没有人知道如何更有效地对data.frame对象进行这种分组？非常感谢
示例：
res_1 <- list(con=list(a.con_1=airquality[1:4,], b.con_1=iris[2:5,], c.con_1=ChickWeight[3:7,]),
dis=list(a.d
浏览 12提问于2016-07-27得票数 1
回答已采纳
3回答
我有两个列表，每个列表里面还有两个包含数据框的列表(换句话说，嵌套列表)。我希望根据主列表和嵌套列表的名称绘制每个数据框并为其添加标题。
例如，假设我们有：
a=list(
list(a=data.frame(x=rpois(5,1),y=rpois(5,1)),
b=data.frame(x=rpois(5,1),y=rpois(5,1))),
list(c=data.frame(x=rpois(5,1),y=rpois(5,1)),
d=data.frame(x=rpois(5,1),y=rpois(5,1))))
我们有主要列表的名字：
names(a
浏览 4提问于2012-05-17得票数 3
回答已采纳
我需要检查几个数据帧是否为空，如果它们为空，则赋值。为此，我使用了以下代码
a = data.frame()
b = data.frame()
x = list(a, b)
cc = lapply(x, function(x)
if(is.data.frame(x) && nrow(x)==0){
x= data.frame("11111")
})
但是，这会产生一个列表。我想知道是否有一种方法可以在不将数据帧放入列表中的情况下执行此操作
浏览 8提问于2016-08-05得票数 1
回答已采纳
我希望在每个数据帧中创建一个新的标识符列，其值来自包含嵌套列表的名称。
parent <- list(
a = list(
foo = data.frame(first = c(1, 2, 3), second = c(4, 5, 6)),
bar = data.frame(first = c(1, 2, 3), second = c(4, 5, 6)),
puppy = data.frame(first = c(1, 2, 3), second = c(4, 5, 6))),
b = list(
foo = data.frame(first = c(1, 2, 3),
浏览 0提问于2018-12-07得票数 2
回答已采纳
我有需要应用非常具体的重复删除方法的data.frame列表。我有理由对这个data.frame列表使用特定的条件重复删除。但是，每个单独的data.frame的重复去除条件是不同的。我希望对第一个list元素执行完全重复的删除；对于第二个list元素，我需要搜索出现两次以上的行(freq >2)，并且只保留一行；对于第三个list元素，对出现三次以上的行进行搜索(freq>3)，并在data.frame中保留两行。我试图为这一数据操作任务获得更多的编程、动态解决方案。我试着用我的镜头得到很好的解决方案，但没有得到我想要的输出。我怎样才能轻易做到这一点呢？有什么方法可以更有效地完成
浏览 8提问于2016-12-28得票数 3
回答已采纳
这里我有两个列表，一个是嵌套列表，包含两个类似"IntegerList“的对象，另一个是data.frame对象的列表。我想知道，任何R函数都可以递归地找到从嵌套列表到data.frame对象列表的列表元素的对应映射，然后为它们调用我自己的函数。但是，我实现了一个带有两个参数的函数，其中一个参数是嵌套列表中的列表元素，第二个参数是df对象列表中的data.frame对象。
这是玩具数据的快速可重现示例：
m <- as(list(c(1:2), 3, 4, integer(0), 6), "CompressedIntegerList")
n <- as(li
浏览 0提问于2016-04-19得票数 0
我运行了一个double for循环，并将一些数据存储到一个列表中。具体地说，我将每个15列、大约60到70行的数据帧存储为列表天气的一个元素。例如
> weather[[4]][[5]]
TimeCEST TemperatureC Dew.PointC Humidity Sea.Level.PressurehPa VisibilityKm
1 12:00 AM 12 8 71 1013 20
2 12:20 AM 11 7
浏览 1提问于2015-03-27得票数 2
我有一个嵌套列表sampleList，它可以包含可变数量的数据帧。在本例中，有3个数据帧：
df1 <- data.frame(id = as.integer(c(1, 6)), key = c('apple', 'apple.green'), stringsAsFactors=FALSE)
df2 <- data.frame(id = as.integer(c(1, 3, 5)), key = c('apple', 'apple.red', 'apple.red.rotten'), stringsAs
浏览 1提问于2022-01-26得票数 1
回答已采纳
3回答
如何计算行数？
、、
我有一个简单的问题(至少对我来说不是这样)。我得到了一个列表，其中包含多个不同长度的数据帧。我想计算每个数据帧的长度..
mylist <- list (a = data.frame(i = 1:10, j= 11:20), b = data.frame(i = 1:5, j= 11:15), c = data.frame(i = 1:8, j= 11:18))
mylist
$a
i j
1 1 11
2 2 12
3 3 13
4 4 14
5 5 15
6 6 16
7 7 17
8 8 18
9 9 19
10 10 20
$b
浏览 5提问于2011-09-08得票数 7
我有如下列表，并想把它转换成一个数据框，有什么想法？
X
str(x)看起来像这样：
List of 2
$ :List of 8
..$ :'data.frame': 1 obs. of 5 variables:
.. ..$ DATE_TIME : chr "2013-MAY-30 09:17 AM"
.. ..$ SITE : chr "Home Page - User Time]"
.. ..$ RESPONSE_TIME: chr "-"
.. ..$ AVAIL_PE
浏览 0提问于2013-05-30得票数 0
回答已采纳
假设我有几个数据集，d1、d2、d3，都存储在一个列表中：
a<-1:10
d1<-data.frame(a)
d2<-data.frame(a)
d3<-data.frame(a)
d1$b<-a*1
d2$b<-a*2
d3$b<-a*3
list<-c(d1,d2,d3)
然后我有一个函数，这符合回归。
fxn<- function(param1, param2, dataset){
mod<-lm(dataset$param1~dataset$param2)
return(coef(mod)[2])
}
我想
浏览 5提问于2015-10-08得票数 1
回答已采纳
扫码
添加站长 进交流群
领取专属 10元无门槛券
手把手带您无忧上云
相关资讯
热门标签
云服务器
ICP备案
实时音视频
对象存储
云直播活动推荐
腾讯云开发者
