Question

我有一个数据表，如下所示：

cep3 <- structure(list(lat = c(-23.39429, -23.39988, -23.38233, -23.39009, -23.40135, -23.4019), lon = c(-46.3277, -46.30741, -46.30328, -46.31071, -46.32225, -46.32242), jobs = c(3, 1, 127, 2, 11, 2)), row.names = c(NA, -6L), class = c("tbl_df", "tbl", "data.frame"))
head(cep3)

我想获得每条线的n份副本（n =作业），每条线代表一个作业，但要保持经度/纬度，以便在绘制时每条线代表一个点。

有一种简单的方法可以做到吗？我找不到任何解决方案。

Answer 1

一个选项是#plotting revenue_adj vs vote_average data df.plot.scatter(x='revenue_adj',y='vote_average',s=.5,title='Average Movie Vote per Budget',figsize=(8,5));

df.groupby('genres')['vote_average'].mean().plot()

如果我们需要保留“职位”列，请使用uncount（默认为TRUE）

library(tidyverse)
cep3 %>% 
    uncount(jobs)

如何分解行？

1 个答案: