与这个问题类似，我想选择每个组的最后一行并为其分配一个值。
a <- data.frame("ID" = c("A", "A", "B", "B", "C", "C"),
"NUM" = c(1, 2, 4, 3, 6, 9),
"VAL" = c(1, 0, 1, 0, 1, 0))
ID NUM VAL
A 1 1
A 2 0
B 4 1
B 3 0
C 6 1
C 9 0
我想要的输出：
ID NUM VAL end.spell
A 1 1 0
A 2 0 1
B 4 1 0
B 3 0 1
C 6 1 0
C 9 0 1
我该怎么做呢？任何帮助表示赞赏。
我有以下数据，带有二进制变量x：
df <- data.frame(id = c("a", "a", "a", "a", "b", "b", "b", "b"),
year = c("2001", "2002", "2003", "2004", "2001", "2002", "2003", "2004"),
x = c(0, 0, 1, 0, 0, 1, 1, 0))
id year x
a 2001 0
a 2002 0
a 2003 1
a 2004 0
b 2001 0
b 2002 1
b 2003 1
b 2004 0
我想创建一个变量，为 的第一个实例y分配整数序列。理想输出：y = 0x = 1
id year x y
a 2001 0 -2
a 2002 0 -1
a 2003 1 0
a 2004 0 1
b 2001 0 -1
b 2002 1 0
b 2003 1 1
b 2004 0 2
任何帮助表示赞赏！
我想绘制以下数据：
df <- structure(list(age.cat = structure(c(1L, 1L, 1L, 1L, 1L, 1L,
1L, 1L, 1L, 1L, 1L, 1L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L,
2L, 2L), levels = c("0-5", "5-10", "10-15", "15-20", "20-25",
"25-30", "30-35", "35-40", "40-45", "45-50", "50-55", "55-60",
"60+"), class = "factor"), sex = c("0", "0", "0", "0", "0", "0",
"1", "1", "1", "1", "1", "1", "0", "0", "0", "0", "0", "0", "1",
"1", "1", "1", "1", "1"), activity_group = c("Food Process",
"Household", "Labor", "Manufacture", "Other", "Resource Acq",
"Food Process", "Household", "Labor", "Manufacture", "Other",
"Resource Acq", "Food Process", "Household", "Labor", "Manufacture",
"Other", "Resource Acq", "Food Process", "Household", "Labor",
"Manufacture", "Other", "Resource Acq"), count = c(97L, 86L,
12L, 75L, 0L, 68L, 62L, 115L, 15L, 88L, 0L, 68L, 153L, 70L, 2L,
71L, 0L, 290L, 175L, 150L, 44L, 138L, 0L, 500L), total = c(146L,
2586L, 34L, 81L, 2767L, 92L, 100L, 2462L, 27L, 95L, 2549L, 121L,
240L, 2002L, 48L, 116L, 1573L, 362L, 256L, 2450L, 75L, 170L,
2180L, 836L), prop = c(0.0169996494917631, 0.0150718541885734,
0.00210304942166141, 0.0131440588853838, 0, 0.0119172800560813,
0.0115801270078446, 0.0214792678371311, 0.00280164363093015,
0.0164363093014569, 0, 0.0127007844602167, 0.0352453351762267,
0.0161253167472932, 0.00046072333563695, 0.0163556784151117,
0, 0.0668048836673577, 0.0293279705044411, 0.0251382604323781,
0.0073738897268309, 0.0231271995977878, 0, 0.0837942014412603
)), class = c("grouped_df", "tbl_df", "tbl", "data.frame"), row.names = c(NA,
-24L), groups = structure(list(age.cat = structure(c(1L, 1L,
2L, 2L), levels = c("0-5", "5-10", "10-15", "15-20", "20-25",
"25-30", "30-35", "35-40", "40-45", "45-50", "50-55", "55-60",
"60+"), class = "factor"), sex = c("0", "1", "0", "1"), .rows = structure(list(
1:6, 7:12, 13:18, 19:24), ptype = integer(0), class = c("vctrs_list_of",
"vctrs_vctr", "list"))), class = c("tbl_df", "tbl", "data.frame"
), row.names = c(NA, -4L), .drop = TRUE))
head(df)
# A tibble: 6 × 6
# Groups: age.cat, sex [1]
age.cat sex activity_group count total prop
<fct> <chr> <chr> <int> <int> <dbl>
1 0-5 0 Food Process 97 146 0.0170
2 0-5 0 Household 86 2586 0.0151
3 0-5 0 Labor 12 34 0.00210
4 0-5 0 Manufacture 75 81 0.0131
5 0-5 0 Other 0 2767 0
6 0-5 0 Resource Acq 68 92 0.0119
prop我想使用（在 y 轴上）相对于age.cat（在 x 轴上）绘制条形图ggplot2。但我不知道如何按sex和进行分组activity_group。首先，我想在“dodge”位置进行分组sex，我使用以下代码完成了这一操作：
# Plot
prop %>%
ggplot(aes(age.cat, prop, fill = sex)) +
geom_col(position = "dodge")
但我也希望每个条形都向我显示propfor activity_groupin 位置“堆栈”。任何帮助表示赞赏，谢谢！
我有两个带有字符串的向量，如下所示：
x <- c("Zimbabwe (Rhodesia)", "India", "Equatorial Guinea", "United States")
y <- c("Zimbabwe", "India", "Guinea")
我想获得一个向量，其中包含和之间不完全匹配的字符串。理想的结果是：xy
"Zimbabwe (Rhodesia)" "Zimbabwe" "Equatorial Guinea" "Guinea" "United States"
我试图在这里巩固一些概念 - 我知道我可以用来grep(paste(y, collapse = "|")获取向量的部分匹配，并使用锚点来查找给定字符串的精确匹配。但如何整合它们呢？
我该怎么做呢？
我有一个虚拟变量，如下所示：
df <- data.frame(year = seq(1990, 1997, 1),
x = c(1, 0, 0, 0, 1, 1, 0, 0))
year x
1990 1
1991 0
1992 0
1993 0
1994 1
1995 1
1996 0
1997 0
如果前三年中任何一年的值非零，我想创建一个y等于的虚拟值。预期结果：1x
year x y
1990 1 NA
1991 0 NA
1992 0 1
1993 0 0
1994 1 1
1995 1 1
1996 0 1
1997 0 1
我该怎么做呢？dplyr优选解决方案。