小编Pie*_*une的帖子

我试图将文本打印限制为条形图中的一个变量。我怎么能只标记粉红色条601, 215, 399, 456？

ggplot(df, aes(Var1, value, label=value, fill=Var2)) + 
  geom_bar(stat="identity", position=position_dodge(width=0.9)) + 
  geom_text(position=position_dodge(width=0.9))

structure(list(Var1 = structure(c(1L, 2L, 3L, 4L, 1L, 2L, 3L, 
                                  4L, 1L, 2L, 3L, 4L), .Label = c("Zero", "1-30", "31-100", "101+"
                                  ), class = "factor"), Var2 = structure(c(1L, 1L, 1L, 1L, 2L, 
                                                                           2L, 2L, 2L, 3L, 3L, 3L, 3L), .Label = c("Searches", "Contact", 
                                                                                                                   "Accepts"), class = "factor"), value = c(21567, 215, 399, 456, 
                                                                                                                                                            13638, 99, 205, 171, 5806, 41, 88, 78)), .Names = c("Var1", "Var2", …

我对 R 相当陌生，我正在尝试创建一个循环以在我的数据框中添加日期列，该列按天增加到设定的日期。

我的数据如下所示：

'A'  'B'  'C'
 1    2    3
 1    2    3
 4    5    6
 4    5    6

我正在尝试添加一个日期列，因此数据如下所示：

'A'  'B'  'C'  'Date'
 1    2    3    1/1
 1    2    3    1/1
 4    5    6    1/1
 4    5    6    1/1
 1    2    3    1/2
 1    2    3    1/2
 4    5    6    1/2
 4    5    6    1/2
 1    2    3    1/3
 1    2    3    1/3
 4    5    6    1/3
 4    5    6    1/3

我感谢任何帮助！

我在几何形状为多边形类型的sf对象上进行按行操作遇到了一些麻烦。

by_row中的sf函数似乎不起作用，例如，以下代码应创建一个包含边界框对象的列表列：

 purrr::by_row(sf_polygons_object, function(x) {
   list(st_bbox(x))
 }, .to = 'bb')

UseMethod（“ st_bbox”）中的错误：没有适用于“ st_bbox”的适用方法应用于类“ c（'tbl_df'，'data.frame'）”的对象

（本身并不是最有用的示例，但可以说明问题）。

我尝试了几种替代方法，例如rowwise() %>% mutate()，mutate( x = apply(., 1, function(x) ...))和，它们都无法工作，因为它们不向st_bbox（）提供所需的sf对象。这是一个错误，还是我处理问题的能力很差？

编辑：可复制的示例

library(sp)
library(rgdal)
library(rgeos)
library(sf)
library(tidyverse)
library(rnaturalearth)

nec <- st_as_sf(ne_countries()[1:5,]) %>%
  purrr::by_row(., function(x) st_bbox(x), .to = 'bb')

我想拆分这样的字符串:

my_list = [{'lat': -27.239722222222223, 'name': 'Geraldton', 'long': 114.62222222222222}]

成为个人价值观:

my_list2 = ['lat', -27.239,'name', 'Geraldton', 'long', 114.6222]

或者在字典或列表中我可以调用要使用的元素.