我在另一列下方添加一列時遇到問題。
我有這樣的資料：
| 標題 1 | 標題 2 | 價值 |
|---|---|---|
| 12 | 34 | 1 |
| 99 | 42 | 0 |
我希望第 2 列低于 1：
| 標題 1 | 價值 |
|---|---|
| 12 | 1 |
| 99 | 0 |
| 34 | 1 |
| 42 | 0 |
你有什么建議嗎？先感謝您
uj5u.com熱心網友回復：
您也可以rbind將兩個資料框放在一起：
library(tidyverse)
df <- data.frame(
list(
heading1=c(12, 99),
heading2=c(34, 42),
value=c(1,0)))
rbind(df %>% select(heading1, value),
df %>% select(heading2, value) %>% rename(heading1 = heading2))
heading1 value
1 12 1
2 99 0
3 34 1
4 42 0
uj5u.com熱心網友回復：
在我看來，完全tidyverse是這樣：
library(tidyverse)
df <- data.frame(
list(
heading1=c(12, 99),
heading2=c(34, 42),
value=c(1,0)))
output <- bind_rows(
df %>% select(heading1, value),
df %>% select(heading1 = heading2, value)
)
uj5u.com熱心網友回復：
你可以做
data.frame(Heading = c(df$`Heading 1`, df$`Heading 2`), value = rep(df$Value, 2))
#> Heading value
#> 1 12 1
#> 2 99 0
#> 3 34 1
#> 4 42 0
uj5u.com熱心網友回復：
你可以使用unlist和cbind結果。
cbind("Heading 1" = unlist(df[1:2]), df[3])
# Heading 1 value
#heading11 12 1
#heading12 99 0
#heading21 34 1
#heading22 42 0
或者沒有名字。
cbind("Heading 1" = unlist(df[1:2], use.names = FALSE), df[3])
# Heading 1 value
#1 12 1
#2 99 0
#3 34 1
#4 42 0
轉載請註明出處，本文鏈接：https://www.uj5u.com/qiye/480405.html
標籤：r