如何正确使用mutate_all和重新编码一起使用dplyr？
在使用dplyr包进行数据处理时，mutate_all函数可以用于对数据框中的所有列进行相同的操作。重新编码可以用于将某一列的值映射为新的值。下面是如何正确使用mutate_all和重新编码一起使用dplyr的步骤：
- 首先，确保已经安装了dplyr包，并加载它：library(dplyr)。
- 使用mutate_all函数对数据框中的所有列进行相同的操作。例如，如果要对所有列进行平方操作，可以使用mutate_all(df, ~ .^2)，其中df是你的数据框。
- 如果需要对特定列进行重新编码，可以使用mutate函数结合ifelse语句来实现。例如，如果要将某一列的值映射为新的值，可以使用mutate(df, new_column = ifelse(old_column == "A", "B", "C"))，其中df是你的数据框，new_column是新的列名，old_column是旧的列名，"A"是需要重新编码的值，"B"是映射后的新值，"C"是其他情况下的默认值。
- 如果需要对多个列进行重新编码，可以使用mutate_at函数结合ifelse语句来实现。例如，如果要将多个列的值映射为新的值，可以使用mutate_at(df, vars(col1, col2), ~ ifelse(. == "A", "B", "C"))，其中df是你的数据框，col1和col2是需要重新编码的列名，"A"是需要重新编码的值，"B"是映射后的新值，"C"是其他情况下的默认值。
- 在使用dplyr进行数据处理时，可以结合其他函数和操作符来实现更复杂的数据转换和处理。例如，可以使用filter函数对数据进行筛选，使用group_by函数对数据进行分组，使用summarize函数对数据进行汇总等。
总结起来，正确使用mutate_all和重新编码一起使用dplyr的步骤如下：加载dplyr包，使用mutate_all函数对所有列进行相同的操作，使用mutate函数或mutate_at函数结合ifelse语句对特定列进行重新编码，结合其他函数和操作符进行更复杂的数据处理。
相关·内容
我有一个调查，有40个分类变量，有四个答案选项，我需要重新计算。
变量示例：
table (BD$Q12)
Never 3-5 times
104 3
table (BD$Q1)
Never 1-2 Times 3-5 Times 6+ Times
83 16 5 2
到目前为止，我对5-8个变量进行了调查，这样我就可以用这样的代码行来解决我的问题：
BD$Q1 <- factor (BD$Q1, levels = c ("Never", "1-2 Times", "3-5 Times
浏览 0提问于2019-05-09得票数 0
回答已采纳
我想将mtcar数据帧中的所有列转换为类类型“字符”。
library(tidyverse)
mtcars %>% as_tibble() %>% mutate_all(as.character())
#> # A tibble: 32 x 11
#> mpg cyl disp hp drat wt qsec vs am gear carb
#> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl>
浏览 4提问于2020-09-14得票数 2
回答已采纳
我想使用data.frame ()对mutate_all()的所有列进行迭代，然后使用ifelse()选择性地更改值。
testdf <- data.frame("a"=c(1,2,3), "b"=c(4,5,6), "c"=c(7,8,9))
mutate_all(testdf, ifelse(.>9,10,.))
但这行不通。我总是得到“对象”。“找不到”。如何引用通过mutate_all()函数传递的单个值？我以为“.”是这样的吗？这样做是可行的：
mutate_all(testdf, funs(.*2))
浏览 2提问于2018-12-12得票数 6
回答已采纳
我有一个有100列的数据框，我想把它们都转换成因子。我们假设数据帧，
a <- as.integer(c(1,2,1,2,1,1))
b <- as.integer(c(1,2,3,3,3,1))
df <- data.frame(a,b)
我在试这个，
library(dplyr)
colwise(df, as.factor(df))
这会给我一个像这样的错误，
> colwise(df, as.factor(df))
Error in sort.list(y) : 'x' must be atomic for 'sort.list'
浏览 0提问于2018-08-11得票数 0
library(tidyverse)
mytbl <- tibble(a = rep(c(1,1,0,1), 4), b= rep(c(1,0,0,1), 4))
# A tibble: 16 × 2
a b
<dbl> <dbl>
1 1 1
2 1 0
3 0 0
4 1 1
5 1 1
6 1 0
7 0 0
8
浏览 0提问于2016-10-24得票数 10
回答已采纳
3回答
问题：
如何使用R快速有效地从数据文件中删除所有特殊字符？
进度：
因此，详细介绍了如何删除特殊字符。我可以将gsub函数应用于单个列(图1和2)，但不能应用整个dataframe。
问题：
我的dataframe由整数、字符串等组成的100+列组成。当我尝试在dataframe上运行gsub时，它不会返回我想要的输出。相反，我得到了如图3所示的内容。
df <- read.csv("C:/test.csv")
dfa <- gsub("[[:punct:]]", "", df$a) #this works on a single c
浏览 0提问于2018-04-17得票数 5
回答已采纳
我有一个具有7个不同功能的数据帧。我需要缩放值，但对于每个独立的功能。我目前使用的是“重定标”。但是，我只能将其放到一列中，并使用1个要素的最小值和最大值转换所有数据！！
如何为R中的每个列/功能使用MinMaxScaler？
浏览 11提问于2021-11-11得票数 0
有谁知道如何使用%>%或%<>%来做到这一点： cars[cars$speed < 10 & cars$dist < 95 | cars$speed > 100,] <- NA 我试过了： cars %>%
.[.$speed < 10 &.$dist < 95 | .$dist > 100,] %>%
set(., j=1:dim(.)[2], value = NA) 但这不是正确的方式。
浏览 3提问于2019-02-04得票数 0
1回答
我对此进行了广泛的搜索，我能够找到的所有示例都将行顺序随机化，但无法找到行本身中的数据。我正在尝试创建一个数据需要随机化的数据集。
我正在尝试把df变成df2；
df：
df <- data.frame(a = c(1:5),
b = c(LETTERS[1:5]),
c = c(letters[1:5]))
a b c
1 1 A a
2 2 B b
3 3 C c
4 4 D d
5 5 E e
df2
a b c
1 2 D b
2 1 B d
3 4 E c
4 3 A a
5 5 C e
我认为没有很
浏览 0提问于2020-11-07得票数 0
我正在使用read.table读入一个UTF8编码的数据文件。当使用'encoding="UTF- 8 "‘选项时，任何无限大的符号都被读取为数字8。 不管它有什么价值，这是令人不快的一句话： read.table(file.path(workingDir, "datafile.csv"), sep=",", blank.lines.skip=TRUE, allowEscapes=FALSE, header=TRUE, encoding="UTF-8") 该文件的一个片段： ? 所有其他值都被正确读取，因此我感到
浏览 26提问于2019-02-05得票数 2
回答已采纳
3回答
我使用pivot_wider来传播我的数据。但是，存在重复的行(尽管我仍然不清楚原因)，所以重复的行被存储在“list_columns”中。我现在正在尝试识别哪些单元格已经存储为列表，并且我希望仅用列表中的第一个元素替换这些值。 示例： df <- tibble(
a = list(c("a", "b"), "c"),
b = list(1, 2),
c = c(11, 22)
) 当我在RStudio View(df)中查看这个df时，a列中的第一个单元格显示为c("a", "b"
浏览 43提问于2020-06-10得票数 2
回答已采纳
1回答
我正在尝试在中复制示例代码
然而，我在第一步遇到了一个问题，我知道funs()已经被弃用了，mutate_all也是如此。我尝试用list替换funs()，用mutate_across替换mutate_all，但我无法让前几行代码正常工作。我甚至不明白这行代码在做什么。有没有人可以解释一下，并建议一个替代方案？
data(cheating)
cheating <- cheating %>% clean_names()
df_cheat <- cheating %>%
dplyr::select(
浏览 9提问于2021-05-27得票数 0
我需要应用这个函数
replace_outliers <- function(column) {
qnt <- quantile(column, probs=c(.25, .75))
upper_whisker <- 1.5 * IQR(column)
clean_data <- column
clean_data[column > (qnt[2] + upper_whisker)] <- median(column)
clean_data
}
要获得如下所示的数据集：
Category a b c
浏览 37提问于2018-08-29得票数 0
回答已采纳
1回答
我有这样的数据框架
MSFT AAPL GOOGL
1 21.11067 4.975767 94.04000
2 20.91273 5.663524 97.50684
3 20.05333 5.681336 90.57909
希望创建一个具有前一次数据滞后的文件，如
MSFT AAPL GOOGL
1 20.91273 5.663524 97.50684
2 20.05333 5.681336 90.57909
3 20.09447 5.239416 99.60738
尝试这段代码来解决它
Lagcolmean <- lapply
浏览 3提问于2017-05-30得票数 1
回答已采纳
2回答
我有一个百分比的数据框架。我想在每个单元格的末尾添加一个"%“，这样我就可以正确地导出/显示它们。它看起来像这样 c1 c2
r1 2.1 3.5
r2 3.4 4.5 我想要： c1 c2
r1 2.1% 3.5%
r2 3.4% 4.5% 我真的不需要输出特别是dataframe，只需要保留列名和行名。
浏览 45提问于2019-05-07得票数 2
我将以下数据存储在列表中：
set.seed(12345)
df1 = data.frame(replicate(10,sample(0:500,100,rep=TRUE)))
df2 = data.frame(replicate(10,sample(0:500,100,rep=TRUE)))
list = list(df1, df2)
如何执行以下操作：
1)对于每列，获取列总和中每个元素的份额(即，每个元素除以列总数)，然后将份额平方
2)取步骤1中每列的总和
然后，输出将是一个包含2个向量( df1和df2各一个)的列表，每个向量包含10个分数。
我的代码，如下所示，似乎不能工作。任何建
浏览 3提问于2018-05-23得票数 0
3回答
我有一个有200列的数据文件。我希望使用dplyr来清理数据，以便将小于0.05的每个数字替换为0。下面粘贴了一个样本df。
df
0.07262
0.039885
0.090173
0.124043
0.09201
0.068309
0.146381
0.09127
0.060768
0.111031
这是预期的结果。
df
0.07262
0
0.090173
0.124043
0.09201
0.068309
0.146381
0.09127
0.060768
0.111031
这是我的代码：df2 <- mutate_all(ifelse(<0.05,0.,))，但是它不工
浏览 0提问于2018-10-09得票数 0
回答已采纳
从这个数据帧中：
df <- data.frame(id = c(1,2,3,4),
scores = c(-1.1,0.2,1.3,-0.4),
col2 = c(1,0,1,0),
col2 = c(1,1,1,1), col3 = c(-0.3,-0.2,3.3,-2.4))
如果我们使用str(df)，我们可以看到列是int或num。
怎样才能转换成因子呢？
例如此数据帧的str(df)：
df <- data.frame(id = c('1','2
浏览 1提问于2018-03-08得票数 0
2回答
我想一次一行地添加我的数据帧的列的总和。
所以对于每一行，我想计算它上面的列的总和。
结合使用colSums和apply (或sapply，rollapply)，有没有一种很好的方法来实现这一点？我已经尝试了几个这样的组合，但是我不能完全弄明白。
浏览 18提问于2018-02-04得票数 2
回答已采纳
我已经编写了一个函数来读入一组dbf文件。不幸的是，这些文件非常大，我不希望任何人不得不代表我运行它们。 readfun_dbf = function(path) {
test = read.dbf(path, as.is = TRUE) # dont convert to factors
test
} dbfiles标识文件名列表。map_dfr将我的函数应用于文件列表，row将它们绑定在一起。我使用非常类似的代码来读入一些文本文件，所以我知道逻辑是有效的。 dbfiles = list.files(pattern = "assign.dbf", full.na
浏览 12提问于2020-03-24得票数 0
回答已采纳
我想将一个函数元素按顺序应用到一个数据文件列表中。我能够应用一个简单的函数，但不是一个更复杂的函数，因为我不知道如何引用这些论点。
我能够在数据框架上执行以下操作：
df1 <- data.frame(
A = c(1, 2),
B = c(1, 3)
)
centered <- apply(df1, 2, function(x) x - mean(x))
scaled <- apply(centered, 2, function(x) x/sqrt(sd(x)))
然后，我创建了一个包含两个数据帧的列表(它们的行数相同，列数不同)：
df1 <- data.
浏览 6提问于2019-09-26得票数 2
回答已采纳
1回答
我有一个如下的数据框架：
AA BB CC DD
aa 2.6 -0.3 2.5 2.3
bb -0.3 1.2 2.1 0.8
cc 0.5 -0.4 0.4 0.4
我希望根据每一列对此数据框架进行分位数排序，并将每一列的排序更改为数据帧。我想用dplyr软件包。我可以为导致以下数据框架的一列执行此操作：
AA BB CC DD quantile
aa 2.6 -0.3 2.5 2.3 4
bb -0.3 1.2 2.1 0.8 1
cc 0.5 -0.4 0.4 0.4 2
但是我想在相应的
浏览 0提问于2018-07-03得票数 1
回答已采纳
我目前有一个股票KPI的数据，我想从数据中删除"$“字符。但是，除了强制使用包之外，我只能使用一行代码。从文档来看，"stri_replace_all_fixed“是我最突出的函数，但在运行该函数时，我的数据帧丢失了它的格式。我尝试将stri_replace_all_fixed函数和lapply组合在一起，但没有效果。对于如何解决这一问题，我们将不胜感激。
浏览 2提问于2017-11-13得票数 0
回答已采纳
1回答
我正试图将一个数据集导入到RStudio中，但是由于汉字变成了杂乱的代码，所以我被汉字困住了。以下是代码：
library(tidyverse)
df <- read_csv("中文,英文\n英文,德文")
df
# A tibble: 1 x 2
`\xd6\xd0\xce\xc4` `Ӣ\xce\xc4`
<chr> <chr>
1 "<U+04E2>\xce\xc4" "<U+00B5>\xc2\xce\x
浏览 2提问于2017-10-29得票数 3
回答已采纳
1回答
R中的Tilde和点
、、、
我知道这是一个普遍的基本问题。但对我来说还是有点困惑。“问题”是~和. in R。它们随处可见，我不知道它们在每一种情况下的确切含义。例如，有这样的代码，我希望将每个-1或-9编码为NA：
df_clean = dplyr::mutate_all(df, ~ifelse(. %in% c(-1, -9), NA, .))
因此，在本例中，df是一个包含多个列的data.frame。其中有些含有许多NAs。但是为什么~在ifelse面前？第一个.帮助迭代每一行？
很抱歉给你造成了混乱。但也许有人可以用一些简单的话来解释这一点；)
浏览 1提问于2020-01-22得票数 4
回答已采纳
我正在尝试创建一个新的数据框架，根据调查答案计算分数。我似乎无法让分数数据框架正确地填充。
我尝试在for循环中使用一系列if for语句。
df <- rbind(c("Y", "no", "Often"), c("N", "yes", "always"), c("Y", "yes",
"never"))
score <- as.data.frame(matrix(0, nrow = 3, ncol = 3))
t <-
浏览 0提问于2019-07-10得票数 0
回答已采纳
我有以下功能，我想应用于数据框架的列：
ff <- function(w, epsi, df) {
res <- w*(max(df, na.rm = T) - min(df, na.rm=T)+2*epsi)+min(df, na.rm = T) - epsi
return(res)
}
该函数应该应用于w的每一列，使用参数epsi和df。函数必须取w的每个值，并将其乘以对应的df列的最大值减去df列的min，依此类推。
例如：
> w
# A tibble: 5 x 2
A B
<dbl> <dbl>
1 0.2
浏览 1提问于2018-07-28得票数 2
回答已采纳
我有一个数据集，其中一些缺少的值被编码为-99，并尝试使用纳米函数replace_with_na_all将这些值替换为NA。该函数可以做到这一点，但它似乎也将我的因子变量转换为整数，从而丢失了因子的名称。
无论因子本身是否已经有一些真的(NA)缺失值，都会发生这种情况，您可以在下面的示例中看到(在tibble1中，因子从一开始就有缺失值，在tibble2中没有)。
library(tidyverse)
library(naniar)
# Example factor with missing values
tibble1 <- tribble(
~x, ~y,
"a&#
浏览 7提问于2019-10-30得票数 2
我希望从dataframe的两列中筛选字符串的独特组合。
初步数据：
trial<-data.frame(x=c("A","B"),y=c("B","A"))
trial
x y
1 A B
2 B A
预期结果：
x y
1 A B
到目前为止，我已经尝试使用dplyr::distinct() version 0.8.3和unique(trial[,c("x","y"])，但都没有产生所需的结果。将更多的字符添加到每个列中，使之具有手动创建的组合无助于解决问题。
tr
浏览 3提问于2019-12-05得票数 1
回答已采纳
1回答
需要在多个变量之间更改多个值
、、、、
我有72个变量，用来表示一个孩子是否能读到72个单词。这些变量实际上被编码为"" (空)、"!"和"1"，分别用来指示子变量是正确的、未到达的还是不正确的。值被编码为字符串。这是提布尔的摘录
lit <- data.frame(rbind(c("1", "", "", ""),
c("", "1", "1", "1"),
c("!", ""
浏览 1提问于2019-10-22得票数 0
回答已采纳
我正在尝试导出我一直在处理的csv文件。要上传它，我需要有分隔符作为；和周围的所有字段，包括那些作为日期的报价。
我试过了：
write.table(original, file = "Original2.csv", append = FALSE, quote = FALSE, sep = ";", na = "NA", row.names = FALSE)
当我的文件被称为原始文件时，当我在notepad++中导出并查看它时，那里没有引用。我已经尝试在excel中添加引号之后，但它不工作的日期，所以这也不是一个选择。
如果我甚至尝试手动完成它，
浏览 4提问于2020-05-11得票数 0
如何将所有NA、NaN、0、0.00、0.000值替换为一次多行多列的1？谢谢。
一个示例df：
a = c(233, 0, NA, 3455)
b = c(23, 0.000, NA, 345)
c = c(223, 0.00, NaN, 30055)
df = cbind.data.frame(a,b,c)
浏览 0提问于2018-06-22得票数 0
回答已采纳
我有一个数据框，其中包含来自在线调查平台的问卷数据。我试图用tidyverse的haven::write_sav()将这些数据帧的一部分写入到SPSS文件中，但是我遇到了一些数据争论的问题，这就是对数据的干扰。
问题是，SPSS只允许小于120个字符的可变级别。我的变量级别超过了这个限制，这不允许我使用数据帧编写*.sav文件。
因此，我的想法是将每个dataframe列的每个出现级别截断为<= 120个字符，以确保写入过程不会中断，但我不知道如何操作所有列中的所有级别。
我像这样提取级别：
df %>%
lapply(levels)
但是之后我就不知道如何处理我得到的列表
浏览 2提问于2019-03-12得票数 2
1回答
潮汐生态系统中ave()的等价性
、、、、
我想知道在我下面的代码中，cov(sapply(dat[-1], ave, dat[1]))在library(tidyverse)中的等效性是什么？
library(tidyverse)
(T1 = matrix(c(2,3,5,2, 3,4,4,5),4,2) )
colnames(T1) <- c("y1", "y2")
(T2 = matrix(c(4:6, 8,6,7),3,2) )
colnames(T2) <- colnames(T1)
(T3 = matrix(c(7,8,10,9,7, 6,7,8,
浏览 2提问于2021-02-15得票数 2
回答已采纳
我有一个具有数千行和列的数据帧，其中需要计数字符变量从第一行到另一行的变化(第1行-行2、第1行-第3行、第1行-第4行、…)。并将更改总数输出到新列中。
df <- data_frame(
a = c("1 2", "1 2", "2 2", "2 2"),
b = c("2 1", "1 2", "1 2","1 2"),
c = c("1 1", "1 2", "2 1","2 2"
浏览 4提问于2020-05-14得票数 0
回答已采纳
我有一个有20列的数据。我想先计算前两列的和，然后再算下三列，然后继续加，直到我得到所有20列的和为止。DataFrame只有0和1。如果k列数之和超过5，我希望将其余列的值更改为0。我无法创建一个循环来执行相同的操作。
0 0 0 1 1 0 1 1 1 0 0 0
0 1 1 0 0 0 1 0 1 0 0 0 1 0 0
1 0 1 0 0 0 1 1 1 0 0 0 1 0 1
0 1 1 0 0 0
0 1 0 1 0 1 0 0 0 1 1 0
在第一行中，由于我们在第9列中实现了sum=5，我希望将其余的值更改为0，即最后一个值改为0。
浏览 4提问于2020-04-23得票数 3
回答已采纳
我有一个数据框，其中包含调查受访者现在和以前拥有的电视和收音机数量的数据：
DF <- data.frame(TV_now = as.numeric(c(4, 9, 1, 0, 4, NA)),
TV_before = as.numeric(c(4, 1, 2, 4, 5, 2)),
Radio_now = as.numeric(c(4, 5, 1, 5, 6, 9)),
Radio_before = as.numeric(c(6, 5, 3, 6, 7, 10)))
我想要将每个变量的
浏览 27提问于2018-06-02得票数 1
回答已采纳
1回答
library(magrittr)
library(dplyr)
A <- c('X', 'X', 'Y', 'Y')
B <- c('X', 'X', 'Y', 'Z')
sample_df <- data.frame(A, B)
sample_df %>% filter(A!=B)
我想选择A和B的值不一致的所有行(A和B是因子)；上面的代码抛出错误"Error in Ops.factor(A，B)：level sets of
浏览 7提问于2020-05-06得票数 0
回答已采纳
我正在处理一个包含1000 s列的df (一些列包含数字值，一些列包含字符和一些逻辑值)，我的df conatins值如“不适用”、“未知”、“未确定”等。如何用"NA“替换所有这些值？
--我尝试过遵循下面的代码，它输出空单元格，而不是用"NA“替换。na_string <- c("NA“、"Not_Applicable”、“不可用”、“不适用”、“未知”、“未评估”)。
na_string) % df%>% replace_with_na_all(条件=~.x %)
I还使用了奈米封装df %>% replace_with_na_all(条
浏览 0提问于2020-09-04得票数 1
回答已采纳
1回答
将R数据框中的多个值替换为单个值
、、、、
我正在尝试将整个r数据帧中的一组值替换为单个值。有人能帮我吗？
V <- c(-1，-2，-3，-4)替换值- 999
我使用的是dplyr中的mutate_all。如何将其与向量一起使用？
library(dplyr)
df %>%
mutate_all(funs(gsub("-1.*","999",.)))
浏览 0提问于2020-05-20得票数 0
假设我有
dat <- as.data.frame(matrix(LETTERS, 10, 5), stringsAsFactors = F)
我想用vowel替换与以下字符向量中的元素匹配的元素
vowels <- c("A", "E", "I", "O", "U")
以下内容不起作用
dat[dat %in% vowels] <- "vowel"
如果我将dat转换成矩阵，它就能工作，但由于它的大小和内存问题，对我的实际数据来说是不可行的。
我该怎么做呢?在基和tidyvers
浏览 2提问于2020-04-29得票数 1
回答已采纳
为什么dplyr::summarise_all在dplyr::mutate_all之后抛出一个错误
mtcars %>% dplyr::mutate_all(scale) %>% dplyr::summarise_all(mean)
这两种方法中的任何一种似乎都很好，但似乎并不是在mutate_all之后总结的。
mtcars %>% dplyr::mutate_all(scale)
mtcars %>% dplyr::summarise_all(mean)
浏览 0提问于2018-05-05得票数 1
回答已采纳
2回答
我知道外面有很多资源。我非常高兴收到一些好的资源的迹象，因为对于一个初学者来说，很难真正知道什么是好的资源。我的问题是，在下面的代码中，.和~的实际意义是什么。我知道他们将所有的-1和99都编码为NA。但是为什么会有这么复杂的语法呢？
mutate_all(df, list(~ifelse(. %in% c(-1, 99), NA, .)
所以这里有data.frame df，它有几列。NAs的所有编码都是-1或99。我想dplyr也有一个na_if-function。这在这里不是更容易使用吗？
浏览 16提问于2019-11-26得票数 0
回答已采纳
2回答
我有一些数据，看起来像这样： Year Revenue Cost Rent
1 2016 3000 4 100
2 2017 4000 5 100
3 2018 5000 6 100
df <- data.frame(stringsAsFactors=FALSE,
Year = c(2016L, 2017L, 2018L),
Revenue = c(3000L, 4000L, 5000L),
Cost = c(4L, 5L, 6L),
Rent = c(100L, 100L, 10
浏览 13提问于2019-03-14得票数 6
回答已采纳
2回答
我有一个包含多列word表单标记的dataframe，如下面的模拟示例所示：
df <- data.frame(
w1 = c("NN1", "NN0", "ADJ", "ADC", "NP0", "VVZ"),
w2 = c("NN0", "NN2", "ADC", "NN0", "VBN", "NN1"),
w3 = c("ADJ", "NN2"
浏览 0提问于2018-06-16得票数 1
回答已采纳
我有一个数据帧df：
df <- structure(list(c1 = c(NA, 0.2, 0.3), c2 = c(0.7, 0.1, 0.6),
c3 = c(0.6, 0.6, 0.6)), class = "data.frame", row.names = c(NA,
3L))
> df
c1 c2 c3
1 NA 0.7 0.6
2 0.2 0.1 0.6
3 0.3 0.6 0.6
我想要改变这个df，所以如果条目大于0.5，它将被替换为"-“。预期结果：
> df
c1 c2 c3
1 NA -
浏览 4提问于2020-08-20得票数 0
回答已采纳
我有这些数据：
# A tibble: 169 x 5
`Topical Anesthesist` `Skin Glue` `Sedation Servi~ `Child Life Ther~ Hypnosis
<chr> <chr> <chr> <chr> <chr>
1 No,
浏览 5提问于2020-04-09得票数 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
回答已采纳
5回答
我有一个包含名为Q1 (通过Q98 )的列的dataframe。这些列包含字符串("This is a string")，但有些条目只包含不同数量的空白(" "、" ")。我想用NA替换所有只包含空白的条目。
考虑由以下代码创建的dataframe：
df<-data.frame(Q1=c("Test test","Test"," "," "),Q2=c("Sample sample"," ","Sample",&#
浏览 2提问于2019-05-24得票数 1
回答已采纳
1回答
我需要将数据帧中的行移动，而不是移动数据，而是将第一行移动到第二行，将第二行移动到第三行。最后一排。第一行包含所有NA。我需要在dplyr内做。如果数据框架是：
1 2 3
4 5 6
7 8 9
我想要的数据如下：
NA NA NA
1 2 3
4 5 6
基本上，我需要类似于r中的熊猫移位()。
提前感谢
浏览 1提问于2016-03-08得票数 2
回答已采纳
扫码
添加站长 进交流群
领取专属 10元无门槛券
手把手带您无忧上云
相关资讯
热门标签
云服务器
ICP备案
对象存储
即时通信 IM
实时音视频活动推荐
腾讯云开发者
