如何根据不同表中的数据创建新行 (R)

如何解决如何根据不同表中的数据创建新行 (R)

所以，如果我有这样的数据表：

getContentAsstring()

然后，我创建一个没有位置信息的新数据框：

#+HTML_HEAD: <base target="_blank">

有没有办法创建一个第三数据集来提供平均位置数，像这样（我不确定如何实际生成这个小标题）：

stores <- read_csv("stores.csv")
stores

# A tibble: 6 x 3
  state      store   num_locations
  <chr>      <chr>           <dbl>
1 california target             20
2 california walmart            29
3 nevada     target             10
4 nevada     walmart            12
5 arizona    target             15
6 arizona    walmart            19

解决方法

一种解决方案是使用tidyverse函数group_by()和summarise()：

library(tidyverse)

stores <- data.frame(
  stringsAsFactors = FALSE,state = c("california","california","nevada","arizona","arizona"),store = c("target","walmart","target","walmart"),num_locations = c(20L,29L,10L,12L,15L,19L)
          )

stores_summary <- stores %>%
  group_by(store) %>%
  summarise(avg_num_locations = mean(num_locations))

stores_summary
# A tibble: 2 x 2
#  store   avg_num_locations
#  <chr>               <dbl>
#1 target                 15
#2 walmart                20

,

在基础 R 中，你可以使用 `aggregate:

aggregate(num_locations~store,stores,mean)
    store num_locations
1  target            15
2 walmart            20