placelabel/.Rhistory at master · dis-organization/placelabel · GitHub

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
plot
?st_read
library(sf)
example(st_read)
plot(nc[1])
text(nc)
north_carolina <- read_sf(system.file("shape/nc.shp", package="sf"))
nc_labs <- placelabel(north_carolina)
plot(nc["AREA"])
plot(nc_labs, add = TRUE)
library(placelabel)
library(sf)
north_carolina <- read_sf(system.file("shape/nc.shp", package="sf"))
nc_labs <- placelabel(north_carolina)
plot(nc["AREA"])
plot(nc_labs, add = TRUE)
plot(st_geometry(north_carolina))
plot(nc_labs, add = TRUE)
plot(st_geometry(north_carolina))
plot(nc_labs, add = TRUE, cex = 0.8)
library(sf)
north_carolina <- read_sf(system.file("shape/nc.shp", package="sf"))
nc_labs <- placelabel(north_carolina)
plot(nc_labs)
library(placelabel)
library(sf)
north_carolina <- read_sf(system.file("shape/nc.shp", package="sf"))
nc_labs <- placelabel(north_carolina)
plot(nc_labs)
names(nc_labs)
plot(nc_labs["NAME"])
library(placelabel)
nc_labs <- placelabel(north_carolina["NAME"])
plot(nc_labs)
library(placelabel)
library(sf)
library(placelabel)
[]
north_carolina <- read_sf(system.file("shape/nc.shp", package="sf"))
nc_labs <- placelabel(north_carolina["NAME"])
plot(nc_labs)
library(placelabel)
plot(nc_labs)
nc_labs
x <- nc_labs
xy <- sf::st_coordinates(sf::st_centroid(x))
labname <- setdiff(attr(x, "sf_column"), names(x))[1L]
labname
library(placelabel)
library(sf)
north_carolina <- read_sf(system.file("shape/nc.shp", package="sf"))
nc_labs <- placelabel(north_carolina["NAME"])
plot(nc_labs)
library(placelabel)
devtools::use_readme_rmd()