如何使用case_when创建列表
使用case_when函数可以根据条件创建一个列表。case_when函数是一种条件语句，它可以根据不同的条件返回不同的值。
在R语言中，可以使用dplyr包中的case_when函数来创建列表。下面是一个示例：
library(dplyr)
# 创建一个数据框
df <- data.frame(x = c(1, 2, 3, 4, 5))
# 使用case_when创建列表
result <- df %>%
mutate(y = case_when(
x < 2 ~ "A",
x < 4 ~ "B",
x < 6 ~ "C",
TRUE ~ "D"
))
# 输出结果
print(result)在上面的示例中，我们首先加载dplyr包，然后创建一个包含一列数据的数据框df。接下来，使用mutate函数和case_when函数来创建一个新的列y。在case_when函数中，我们定义了一系列的条件和对应的值。如果条件满足，就返回相应的值。最后，将结果打印出来。
这个例子中，我们根据x的值创建了一个新的列y。如果x小于2，y的值为"A"；如果x小于4，y的值为"B"；如果x小于6，y的值为"C"；否则，y的值为"D"。
使用case_when函数创建列表可以根据不同的条件灵活地生成不同的值，适用于数据处理、数据转换等场景。
腾讯云相关产品和产品介绍链接地址：
- 腾讯云官网：https://cloud.tencent.com/
- 云服务器CVM：https://cloud.tencent.com/product/cvm
- 云数据库MySQL：https://cloud.tencent.com/product/cdb_mysql
- 云原生应用引擎TKE：https://cloud.tencent.com/product/tke
- 人工智能平台AI Lab：https://cloud.tencent.com/product/ailab
- 物联网平台IoT Hub：https://cloud.tencent.com/product/iothub
- 移动开发平台MPS：https://cloud.tencent.com/product/mps
- 云存储COS：https://cloud.tencent.com/product/cos
- 区块链服务BCS：https://cloud.tencent.com/product/bcs
- 元宇宙服务：https://cloud.tencent.com/product/virtual-world
相关·内容
我有乱七八糟的数据(结果)，我想创建一个数据框，其中只从该结果列表中获取某些值，其他值保留为空：
results <- c("500",
"500.0",
"60",
"60.0",
"UNKNOWN",
"450Other",
"300-301",
"ZZZ 12", "8
浏览 14提问于2020-03-08得票数 0
回答已采纳
1回答
我想知道是否有一种方法可以将联系人放入模型中，这样我就可以显示联系人的下拉列表以供选择。
我可以从"_contact_details“表中获得它，但我希望有比这更好的方法。
浏览 13提问于2016-07-25得票数 0
回答已采纳
如何从计算结果中返回列表？该列表的长度必须与第一个参数相同。 circlecalc <- function(var1,R){
if (is.numeric(R) && min(R) >=1){
(toupper(var1)=='AC')
pi*R^2
} else if (toupper(var1)=='CC') {
2*pi*R
} else if (toupper(var1)=='VS') {
4/3*pi*R^3
} else if (toupper(var1)==
浏览 4提问于2019-02-11得票数 0
我有一个大约300个特征和100万次观测的数据。我已经创建了一个list变量，它的索引值包含80%的数据作为NA值。
我的索引列表有-> 2,4，我想为列创建一个指示符变量，用于将NA值替换为"0“，将列中的其他值替换为"1”。
我试图遍历每一行，但由于数据量很大，需要很长时间来循环。
输入数据-> df
行col1 col2 col3
NA 1 3
NA 1 NA
2 2 NA
预期产出：
行col1 col2 col3
1 1
1
1 2
谁能为我指出正确的方向来更快地实现这一点。
谢谢,
雷努卡
浏览 2提问于2018-07-09得票数 0
回答已采纳
我正在尝试对数据集中的一些列进行重新编码。这些列有很多奇怪的名字，比如S3__8或C4__2，还有一些分类列我不想说，它们是以C开头的。 我使用这个片段成功地重新编码了所有的S列： Sa_Recode <- Sa %>%
mutate_at(vars(starts_with("S")),
funs(case_when(grepl("Yes", ., ignore.case = TRUE) ~ "1",
grepl("No", ., ignore.case = TRUE
浏览 13提问于2020-07-17得票数 0
回答已采纳
2回答
我有一个这样的样本数据框架：
dat <- data.frame(V1 = c("Non Debt Balance","Non Debt Income","Non Debt Cost"),
V2 = c("Average Balance","Income","Cost"),
V3 = c("Trade","Sales Finance","Trade"))
我想根据列V2的值创建一个新列。
浏览 0提问于2018-02-01得票数 1
回答已采纳
因此，我试图找出如何从我的数据学院获取专栏Grad.Cat，并将其归类为高值或低值。但是，我不想在dataframe的同一列中将值更改为'high‘和'low’，而是创建一个名为highlow的新的数据列。
如何处理下面的代码，而不是在不覆盖现有数据的情况下创建包含这些值的新数据列。
College$Grad.Cat <- "low"
College$Grad.Cat[College$Grad.Rate>60] <- "high"
College$Grad.Cat <- factor(College$Grad.Cat, l
浏览 0提问于2019-05-03得票数 1
回答已采纳
我想知道如何使用ifelse()命令来创建一个变量来列出数据帧。
我创建了两个数据集，使用来自ggplot2::diamonds数据集的300个顶部和底部值，称为diamonds_top300和diamonds_bottom300。
# Loads packages
# ---- NOTE: making plots and diamonds dataset
if(!require(ggplot2)){install.packages("ggplot2")}
# ---- NOTE: for data wrangling
if(!require(dplyr)){install.
浏览 2提问于2021-03-19得票数 2
回答已采纳
1回答
我有一个dataframe，如这里所示，在“法语”列下有一个person 1的列表。
在“法语”和“中文”栏下，1代表“每天”，2代表“一周几次”，3代表“很少”。
然而，理想的数据转换是创建多个行，而不是为每个包含所有“频繁”点的人创建1行，如下所示
浏览 1提问于2022-01-17得票数 -1
1回答
我有一个具有这种结构的数据框架：
dat <- data.frame(col1 = sample(0:3, 10, replace = TRUE),
col2 = sample(0:3, 10, replace = TRUE))
如果col1和col2都不是0和2，那么我如何创建另一列:1？
谢谢!
浏览 3提问于2022-05-13得票数 0
回答已采纳
我希望将列表中的元素与数据帧中的间隔进行比较，并将相应的间隔分配给该元素。
在我的例子中，我想得到一天中的一个阶段(即早晨，白天，晚上，夜晚)来进行测量。我找到了R包'suncalc‘，它创建了这样的阶段的间隔，并有一个解决方案来分配这些阶段的一天。但这是非常缓慢的，我想知道如何更快地做到这一点。
#make a list of different days and times
times<-seq.POSIXt(from=Sys.time(),
to=Sys.time()+2*24*60*60,length.out = 50)
#load t
浏览 0提问于2019-09-05得票数 1
回答已采纳
很抱歉，如果我的问题有点垃圾！-我对R相当陌生，而且从来没有很好的编码。
背景:我有一个基因名称和其他价值的数据。我有一个特定基因名称的列表，我想在一个新的专栏中将其标记为感兴趣的。即列名："OfInterest"，值为"Y“或"N”。
，这是我迄今为止尝试过的：
DataframeName <- import("filename.xlsx") %>%
as_tibble()
GenesOfInterest <- c('GeneA', 'GeneB', 'GeneC'
浏览 0提问于2021-07-02得票数 0
1回答
我想要创建一个新列，其中包含从另一列索引的数字。列的选择取决于索引编号。
我试过使用if循环，但无法解决如何实现这一目标
testdata <- data.frame(sample=c("A01", "A02", "A03"),
mode=c(187, 189, 190),
control=c("A03",NA,NA),
mancontrol=c(NA, 191, 192))
expe
浏览 1提问于2019-09-29得票数 1
回答已采纳
1回答
我有一个数据集，其中显示了许多不同的地方当局缴纳的税款。
我想创建一个虚拟列，这样，如果我在if语句中声明特定的地方当局，如果它们匹配，则返回值1，如果不匹配，则返回值0。
我试过了：
mutate_if(tax_data, localauthority %in% c('Exeter', 'Glasgow', 'Oxford'), funs(dummy==1))
mutate_if(tax_data, localauthority != c('Exeter', 'Glasgow', 'Oxford'
浏览 2提问于2020-04-22得票数 0
我有个看似小的问题。我想把mutate_all()和case_when()结合使用。样本数据框架：
tbl <- tibble(
x = c(0, 1, 2, 3, NA),
y = c(0, 1, NA, 2, 3),
z = c(0, NA, 1, 2, 3),
date = rep(today(), 5)
)
我首先创建了另一个数据框架，用零替换所有NA，用下面的代码替换1的值。
tbl %>%
mutate_all(
funs(
case_when(
. %>% is.na() ~ 0,
TRUE
浏览 2提问于2019-12-10得票数 3
回答已采纳
我有一个我生成的数据帧，如下所示。 df = data.frame(
Age = sample(18:98, 1000, replace = TRUE)
) 我想创建一个新列，它根据分位数(25%，50%，75% )对Age列进行存储。这可以像这样做： > quantile(df$Age, probs = c(0.25,0.5,0.75))
25% 50% 75%
39 58 78 示例输出将如下所示 Age Age_Bucket
19 25%
26 25%
87 75%
54 25%
20 25%
66 50% 我到底如何在dplyr中做到这一点呢？
浏览 8提问于2021-11-02得票数 0
我现在正在做一个睡眠测量PSQI。一个名为睡眠持续时间的变量是关于每个参与者晚上睡眠的小时数，其值可以是6、7.5、8、10、5、9等。我想创建一个新列，其值根据不同的范围更改为不同的值。睡眠时间小于5小时改为3，睡眠时间5~6小时改为2，6~7小时改为1，超过7小时改为0(我想保留原来的睡眠时间列，即他们晚上的睡眠时间)。我一直在寻找关于脚本的信息，但找不到我想要做的事情。我知道mutate是创建一个新的变量，但我不知道如何设置括号中的参数。有人能教我怎么做吗？提前谢谢你！
ID.。睡眠持续时间。PSQI值
a. 6.5 1
B 5 2
c. 7.5 %0
d. 8%0
e. 5 2
f.
浏览 27提问于2021-05-28得票数 0
回答已采纳
1回答
如果这件事在别的地方被问到了，而我却找不到，我很抱歉。我有一个带有字符向量的数据帧，比如说
library(tidyverse)
mydf <- data.frame(value = c('c','e','a','d'))
一个列表，名称与mydf中的字符向量mydf不完全对应。
mylist <- list ('a' = '1',
'b' = '2',
'
浏览 1提问于2021-11-30得票数 1
回答已采纳
1回答
我有一个csv格式的列表，不同的名称具有相同的底层代码如下：
Code Name
25000 James John Junior
RA25000 James Junior
RA2500009 James J. Junior
RA27000 Bill Hope
RA2800009 Donna Scott
28000 Donna Love Scott
由于该列表共享相同的底层代码25000和28000，我如何才能将该列表更改为具有相同的名称:小詹姆斯·约翰(与25000关联的名称)和唐娜·洛夫斯科特(与28000关联的
浏览 0提问于2020-03-04得票数 0
我有一个嵌套的ifelse语句，如下所示：
combined_data <- original %>%
mutate(new_column = as.character(ifelse(grepl("Apple", list), "Granny Smith Apple",
ifelse(grepl("Banna", list), "Organic Banana",
ifelse(
浏览 5提问于2020-12-03得票数 1
回答已采纳
1回答
我有一个包含列Active和Cycles的数据框。我想添加名为state的第三列，该列根据周期数进行分类。 例如:前20个状态为正常，最后20个为“紧急”，其余为“正常”。 我试着为最后一个和第一个值创建数据框，然后连接它们，但这很麻烦，我不知道如何将标签放在中间的数据上。 df <- data_frame %>%
group_by(ACT) %>%
top_n(20)
df=mutate(df, Fault = "EMERGENCIA") 我突然想到，使用ifelse会更容易，但我不知道在最后一个条件中加入什么
浏览 5提问于2020-10-22得票数 1
2回答
我正在尝试创建一个名为AgeClass的新专栏，其中有两个新类别(“青少年”和“成人”)，基于我形成的Tibble中的HatchMass。“成人”类别几乎是该列中任何NA值。我已经尝试了以下代码：
PBTdata %>% PBTdata
mutate(AgeClass = ifelse(HatchMass != is.na(HatchMass), "Juvenile", "Adult"))
我一直得到一个包含AgeClass列的输出，但它只输出“青少年”类别，并将“成人”列保留为NA。如何更改NA值，使其被归类为“成人”？
浏览 0提问于2019-10-03得票数 0
我想我是在为我的循环的每一次迭代重写我的列表，我只是不知道如何修复它。 a <- c(-45, -345, 610, 23, 705)
for(i in a)
if(i<0){
angle = i + 360
}else if(i>360){
angle = i - 360
}
print(angle) 结果是345 (705 - 360)，但我需要所有的结果。
浏览 23提问于2021-03-17得票数 0
回答已采纳
1回答
我有一个包含大约100个数据帧的列表，并且希望用一个字符替换列表中所有数据帧的特定列(命名事件)中的空单元格。我首先尝试了下面的代码，
lapply(my_list, function(x) replace(x,is.na(x),"No_Event"))
上面的代码将所有NA替换为“No_Event”。但是我要替换特定列中的空单元格。也不确定如何表示代码中的空白单元格。下面的“”不起作用。
然后我试了一下
lapply(my_list, function(x) transform(x, Event = chartr(" ", 'No_Event'
浏览 0提问于2021-06-24得票数 0
回答已采纳
我有一个数据框，其中的一列包含文本和一些变量，这些变量包含与该联盟的强度相对应的值。我想在同一个df中创建一个新列，其中包含每行对应的变量值。 我试过这个： prospects2020$leaguemod <- if(prospects2020$LEAGUE == "QMJHL") {
QMJHLe
} else if (prospects2020$LEAGUE == "OHL") {
OHLe
}else{
WHLe
} 其中QMJHLe、OHLe和WHLe是GE中的变量，它创建列，但每个值都等于QMJHLE值。我收到错误消息： 警告消息：
浏览 13提问于2020-07-12得票数 0
回答已采纳
1回答
我正在尝试创建一个名为"txtype“(治疗类型)的新变量，该变量基于一个包含不同治疗"NDC”代码的变量。在这个"txtype“变量中，我想创建多个级别来表示实际的处理类型。
到目前为止，我只知道如何为实际的处理类型创建更高级别的变量：
data$typeA <- data, NDC %in% c("11111", "22222", "33333"))
但我想要做的是创建数据$ txtype，其中txtype具有从typeA到typeG的级别。例如，在这个新变量txtype中，级别typeA的NDC为11111、
浏览 15提问于2018-04-05得票数 0
2回答
我想就如何根据以下数据集编写新列提供建议：
df <- data.frame(AA = c("3454","345","5","345","567","79","43","2342","231","234","232","24"),
BB = c(123, 345, 7567, 234, 8679, 890, 812, 435345, 567, 568, 786,
浏览 9提问于2020-07-20得票数 0
回答已采纳
最近我在试着模仿一个游戏。我要同时掷两个骰子。如果2个骰子的总和大于或等于10，我赢1分。如果低于10，我就会丢1分。我会这样做1000次。 一开始，我用set.seed (1234)随机抽取了2000个样本 set.seed(1234)
d = sample(c(1:6), size = 2000, replace = T)
d 然后，我将其转换为矩阵，并对每一行求和 a = matrix(d, nrow=1000, ncol=2, byrow=T)
t = rowSums(a)
t 现在，我有1000个元素(每次两个骰子之和)。我想创建一个向量X来计算我可以得到的点。但是，我如何在这个时
浏览 59提问于2020-09-20得票数 0
1回答
我需要从一个列表中的值中减去另一个列表中的值，两个列表都有列表中的列表。对我来说，应用map2函数是可行的。我尝试将min (0,x)应用于函数(使最小的数字= 0)，但我不确定如何做到这一点。 A1 <- list (aa = list(a = data.frame(matrix(1:10,10,15)),
b = data.frame(matrix(1:10,10,15))),
bb = list(a = data.frame(matrix(1:10,10,15)),
b
浏览 29提问于2021-02-04得票数 1
回答已采纳
我需要将一个变量的多个值重命名为R中一个新变量中的类别，是否有一种更有效的方法来做到这一点，而不是将每个变量单独重命名？这是我到目前为止掌握的代码
data.set %>% mutate(income = recode(country, "USA" = "HIC", "Canada" = "HIC", "Japan" = "HIC", "India" = "LMIC"))
当前的数据如下所示，我希望创建收入变量
ID countries
浏览 5提问于2022-07-21得票数 0
回答已采纳
2回答
我有一个dataframe，它有一个变量，它对我的观察(ID)进行分组，还有一个变量是绝对的(类型)。我在R中工作，并试图创建一个新的变量来计算ID中相同类型的连续观测(数据是时间序列)。参见下面的示例表-计数器是我想要创建的变量。无论0是否被计算，都不重要。
dat <- data.frame(id = c(rep("a", 7), rep("b", 4)),
type = c(0, 1, 1, 2, 2, 0, 1, 1, 1, 2, 0),
counter = c(0, 1, 2
浏览 0提问于2018-11-29得票数 2
回答已采纳
2回答
我想根据我的数据框中另一列中的字符串创建一个新列。使用case_when和grepl，如果字符串包含value1或value2，我想创建一个新类。但是，不确定如何将这个“OR”语句放在那里？ 虚拟示例(不起作用)： df <- data.frame(type = "a_m5", "a_m20", "a_5")
df %>%
mutate(modif = case_when(
grepl('_m5'|'_m20', type) ~ 'less', # how to spe
浏览 16提问于2021-04-12得票数 0
回答已采纳
1回答
我想从一个因子创建一组虚拟变量。
例如，mtcars数据集具有cyl值4、6和8。我想创建一组变量，如：four_six，4编码为0，6编码为1。我最终希望创建其他变量，如：six_eight、four_eight。
我用ifelse做了这样的尝试
four_six <- ifelse(cyl == 4, 0, 1)
但是我想把这六条重新定义为1，而不是1。
例如，我希望八号编码为丢失/NA。
另外，是否有一种方法可以用其他函数以编程方式完成此操作？
浏览 1提问于2020-08-15得票数 0
回答已采纳
1回答
我有个数据：
dat <- data.frame(X1 = c(0, NA, NA),
X2 = c(1, NA, NA),
X3 = c(1, NA, NA),
Y1 = c(1, NA, NA),
Y2 = c(NA, NA, NA),
Y3 = c(0, NA, NA))
我想为X和Y变量创建一个综合分数。到目前为止，这就是我所拥有的：
clean_dat <- dat %>% rowwise
浏览 7提问于2022-05-16得票数 3
回答已采纳
1回答
我想创建一个变量"WKA“，它有三个特性:0、1和2。
WKA should be 0 if WKA_ohneJB[, "QUANTITY"]>=1 && WKA_ohneJB[, "WKA"]==0,
WKA should be 1 if WKA_ohneJB[, "QUANTITY"]>=1 && WKA_ohneJB[, "WKA"]>=1,
WKA should be 2 if WKA_ohneJB[, "QUANTITY"]==0 &&am
浏览 6提问于2020-07-10得票数 1
回答已采纳
1回答
昨天我问了here一个问题，关于如何将多行聚合成一个具有三个级别的因子。这个问题已经解决了！然而，我的主管也想创建第二个数据帧。我将解释我的数据框架： 我的数据包含具有多行的参与者。有不同的变量类型(例如，年龄、日期、因素变量等)。我已经聚合了数据，这样每个参与者都有一行，代码如下 example4 <- SMARTdata_50j_diagc_2016 %>%
group_by( Patient_Id ) %>%
summarise( Groep = first( Groep ),
Ziekenhuis_Nr = first( Z
浏览 12提问于2020-03-31得票数 1
回答已采纳
1回答
下面是一个子设置的数据集，我想知道如何对每一组is进行排序，并按照最早的日期排序，创建一个新列来指示"LTD“状态之前的行？其目的是在进入“有限公司”状态之前识别诊断或行，以获得该独特的标识。提前感谢！
数据集：
id <- c(123,123,123,321,321)
diag <- c("injury1", "injury2" , "cancer", "injury5", "cancer")
date <- as.Date(c('2008-11-1','2009
浏览 3提问于2019-09-22得票数 1
回答已采纳
在R中，我尝试创建一个名为model的列，其中的值取决于最多5个其他列的值。 列是运动，汽车，SUV，旅行车，小型货车，皮卡。如果这5列是该组的成员，则值为1，否则为0。我想创建一个名为model的列，如果运动= 1，2如果SUV = 1，3如果货车=1，4如果Minivan =1，5如果皮卡=1，否则如果所有5列都等于0，那么model将=0。我尝试使用case语句，并使用dplyr进行了变异 cars %>%
mutate(model == case_when(Sport == 1, ~ '1'
,case_when(SUV ==
浏览 24提问于2021-10-28得票数 0
回答已采纳
我已经做了一个数据列表，想要根据case_when函数更改值。我不知道如何在单子上申请。
mutate(FLOOR = case_when("FLOOR" == 1 ~ "1",
TRUE ~ "0"),
LIGHTING = case_when(LIGHTING == 1 ~ "1",
TRUE ~ "0"),
CO
浏览 3提问于2022-06-21得票数 -2
我有一个日期列和结果列(1或0)的Dataframe：
df <- data.frame(matrix(nrow=100,ncol = 2))
colnames(df) <- c("date_1", "var")
df$date_1 <- sample(seq(as.Date('1999/01/01'), as.Date('2000/01/01'), by="day"), 100)
df$var <- rbinom(100, 1, 0.2)
我想创建一个名为"date_2“的新变量(
浏览 5提问于2022-03-29得票数 1
我想在dataframe中创建一个新列，其中dataframe的单元格将依赖于一个条件。下面是一些可重复的代码：
a <- c("Boy","Girl","Dog","Cat")
b <- c("1","2","3","4")
df <- data.frame(a,b)
if(df$a=="Boy"|df$b=="Girl"){
df$Type <- "Human"
}
else(
d
浏览 1提问于2020-02-11得票数 0
回答已采纳
我在R中有以下数据帧
data <- structure(list(Category = c("Item 1", "Item 2", "Item 3"), `Month 1` = c(-3.7,
0.8, -2.1), `Month 2` = c(-2.1, 0.8, -3.7)), row.names = c(NA,
-3L), class = c("tbl_df", "tbl", "data.frame"))
我正在使用这个数据帧通过kableExtra创建一个表(并最终以HTML格式
浏览 26提问于2021-05-29得票数 0
回答已采纳
3回答
所以我有一组从A+到F的数据(我不知道为什么会有这样的结果)
我要做的就是把A+~B0转换成“高”，把C+ ~F转换成“低”
我有一个"result“列，其中包含字母表数据的列表。
我创建了另一个列"grade“到"high”"low“
raw.tidy$grade <- raw.tidy$result(high = c("A+", "A0", "B+", "B0"),
low = c("C+", "C
浏览 0提问于2018-06-28得票数 0
2回答
好的，我必须重新编码一个df，因为我希望因子是整数：
library(dplyr)
load(url('http://biostat.mc.vanderbilt.edu/wiki/pub/Main/DataSets/crash2.rda'))
df <- crash2 %>% select(source, sex)
df$source <- sapply(df$source, switch, "telephone" = 1, "telephone entered manually" = 2, "electronic
浏览 5提问于2020-09-28得票数 4
回答已采纳
当查询我的XML数据库时，本质上结果是一个每行一个元素的向量。
input <- c("[1, 1.05e0, true(), \"1\", false()]", "[2, 4.0e0, true(), \"8\", true()]" more rows)
将每个元素转换为列表后，很容易将向量中的每个元素作为行添加到数据帧中。剩下的唯一一件事就是将每一列转换为适当的类型。我的问题是我不知道如何确定每一列的类型。
我首先根据输入的第一个元素创建一个模板。
> template <- input[[1]] %>
浏览 0提问于2020-03-19得票数 0
我有两列- "end_use_type“和"tonnes”。我正在尝试创建第三列，使用"tonnes“中的值，但仅适用于"end_use_type”为“Discard”的行。新列将被命名为"tonnes_discards“。 我想我想使用变异函数，但不知道如何实际选择丢弃的值。 这就是我到目前为止所拥有的，这不是很多，甚至可能是不正确的。 select(c(end_use_type, tonnes)) %>%
mutate()
浏览 16提问于2020-12-13得票数 0
2回答
我想将“超出范围”的文本替换为从每一列中找到的最小值，并从中减去0.01。我如何创建一个循环来完成此操作，而不必手动遍历一个大型数据集？
例如，将OOR <替换为0.18
浏览 6提问于2022-08-16得票数 -1
1回答
我目前正在开发一个金融时间序列数据集，并试图根据回报率(RoR)的观测结果创建一个名为Direction的新变量。本质上，如果当前的RoR高于前几天的RoR，则方向是“向上”，如果是较低的，则为“向下”。
我很确定我可以将for循环与ifelse组合起来创建变量，但是我对R还很陌生，我想不出一种方法来编写代码，从而得到所需的输出。我能够在excel中使用以下函数创建我想要的变量: IF(G4>G3，"Up"，IF(G4=G3，"No Change"，"Down"))，但我不知道如何将该函数转换为R代码
有什么包我可以使用，如果不是，什么代码
浏览 1提问于2019-07-09得票数 0
回答已采纳
1回答
我有一个包含有成员名、成员数和空列表元素的向量的列表。如果有的话，我想要一个包含成员数量的数据框架和一个包含成员名称的列表。
关于如何使用R中的raw.list从purrr到clean.tibble的任何提示。
# Raw Data Example
raw.list <- list(list(list("a", "b", "c")), # members are group a, b, and c (3 members)
NULL, # no members
list(
浏览 3提问于2022-06-20得票数 1
回答已采纳
1回答
我想要创建一个名为eval_data的函数，用户可以在其中输入
数据帧列表应用于数据帧的dplyr函数列表，从每个数据帧中选择的列列表：
这看起来像：
eval_data <- function(data, dplyr_logic, select_vector) {
data %>%
# this doesn't work
eval(dplyr_logic) %>%
select(
{ select_vector }
)
}
dplyr_logic是以下任一项的列表：
nothing 突变语句2变位语句过滤器<co
浏览 3提问于2020-04-29得票数 3
回答已采纳
扫码
添加站长 进交流群
领取专属 10元无门槛券
手把手带您无忧上云
相关资讯
热门标签
云服务器
ICP备案
对象存储
即时通信 IM
实时音视频活动推荐
腾讯云开发者
