小编Tie*_*nan的帖子

我正在使用R笔记本,并希望用它来创建两个ouptuts:HTML文档和PDF文档.

我的分析包括小册子地图(html小部件),当我将笔记本编织成PDF文档时会导致问题.由于包中webshot现在包含的功能knitr,"knitr将尝试使用webshot包自动生成HTML小部件的静态屏幕截图"(https://github.com/yihui/knitr/blob/master/NEWS.md).

当我的输出是一系列相互叠加的传单地图时,这很好用,但我想将这些地图组合成一个更简洁的行排列(见下图).

这是我的R笔记本的可重现的例子:要点

不幸的是,当我尝试将其编织为PDF文档时,我收到以下错误消息:

Error: Functions that produce HTML output found in document targeting latex output.
Please change the output type of this document to HTML. Alternatively, you can allow
HTML output in non-HTML formats by adding this option to the YAML front-matter of
your rmarkdown file:

  always_allow_html: yes

Note however that the HTML output will not be visible in non-HTML formats.

如何在PDF文档中获得此单行排列？

我正在研究一个空间问题,使用sf包dplyr和purrr.

我更喜欢在mutate调用中执行空间操作,如下所示:

simple_feature %>%
  mutate(geometry_area = map_dbl(geometry, ~ as.double(st_area(.x))))

我喜欢这种方法允许我使用%>%和运行一系列空间操作mutate.

我不喜欢这种方法似乎显着增加了sf功能的运行时间(有时令人望而却步),我希望听到关于如何克服这种速度损失的建议.

这是一个详细说明速度损失问题的代表.

请注意:这不是一个最小的示例,需要从ESRI REST API下载一些软件包和一个文件.我希望你能和我好心;)

此示例中的目标是添加一个新列,指示每个北卡罗来纳州县(nc)是否与任何水体多边形(nc_wtr)相交,如下图所示:

我创建了一个执行此计算的函数: st_intersects_any()

然后我在两个数据集(nc和nc_1e4)上对该函数进行基准测试,首先单独使用st_intersects_any()然后在mutate调用中使用它.

## |TEST               |  ELAPSED|
## |:------------------|--------:|
## |bm_sf_small        |     0.01|
## |bm_sf_dplyr_small  |     1.22|
## |bm_sf_large        |     0.95|
## |bm_sf_dplyr_large  |   122.88|

基准测试清楚地表明这种dplyr方法要慢得多,而且我希望有人建议在使用这种dplyr方法的同时减少或消除这种速度损失.

如果有更快的方法使用data.table或我应该检查的其他方法,请让我知道这些. …

我想将数据框分成多列，以便可以看到summary()数据的每个子集的输出。

这是使用split()from 实现此目的的方法base：

library(tidyverse)
#> Loading tidyverse: ggplot2
#> Loading tidyverse: tibble
#> Loading tidyverse: tidyr
#> Loading tidyverse: readr
#> Loading tidyverse: purrr
#> Loading tidyverse: dplyr
#> Conflicts with tidy packages ----------------------------------------------
#> filter(): dplyr, stats
#> lag():    dplyr, stats

mtcars %>% 
  select(1:3) %>% 
  mutate(GRP_A = sample(LETTERS[1:2], n(), replace = TRUE),
         GRP_B = sample(c(1:2), n(), replace = TRUE)) %>% 
  split(list(.$GRP_A, .$GRP_B)) %>% 
  map(summary)
#> $A.1
#>       mpg             cyl           disp          GRP_A          
#>  Min. …

我想从Socrata存储库中读取空间数据集到R中,然后将其转换为简单的要素对象.

数据集由以多边形表示的资本改进项目组成:

上述应用程序中使用的数据可通过Socrata Open Data API(SODA)访问:

library(tibble)
library(dplyr) 
library(purrr)
library(sf) 
library(RSocrata)

obj <- read.socrata("https://data.seattle.gov/resource/pdbw-sw7q.json") %>% as_tibble()

空间数据似乎在the_geom.coordinates列中:

# Inspect the object
glimpse(obj)
#> Observations: 113
#> Variables: 13
#> $ creationdate         <chr> "2017-06-02T13:51:50.854Z", "2017-06-02T1...
#> $ creator              <chr> "Transportation_SeattleCityGIS", "Transpo...
#> $ editdate             <chr> "2017-06-02T13:51:50.854Z", "2017-06-02T1...
#> $ editor               <chr> "Transportation_SeattleCityGIS", "Transpo...
#> $ globalid             <chr> "4a78a16a-9ea4-4a81-8011-ad974c80b357", "...
#> $ objectid             <chr> "967", "646", "968", "11862", "11521", "1...
#> $ project_id           <chr> "TC36717008", "TC367240", …

我正在使用R中的一些表格数据,需要将其导入Tableau.

我可以以各种文件格式(例如,csv,.xlsx,.rda等)导出数据,但是我想知道从成功将数据读入Tableau的角度来看是否存在首选文件格式.

例如,当我将具有缺失值的数据集从R导出到csv时,它将缺失值编码为"NA"字符串.然后,Tableau将这些列误解为字符列.我可以通过将R中的缺失值重新编码为NULL值来避免此错误,但是这种经历让我想知道Tableau是否存在Tableau最无缝导入的特定文件格式.

或者我应该.tde使用rtableau包将R中的数据导出到Tableau Data Extract()中吗？

编辑:不幸的是,我rtableau只与Linux和Mac系统兼容,似乎没有积极维护.

.rda通过Connect> Statistical File接口连接Tableau 可能是最好的方法(这里有更多信息).