-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy pathreadme.rmd
53 lines (47 loc) · 1.27 KB
/
readme.rmd
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
---
output: github_document
---
```{r setup, include = FALSE}
knitr::opts_chunk$set(echo = TRUE,
dpi = 300,
warning = FALSE,
message = FALSE,
out.width = "100%",
out.height = "100%",
fig.align = 'center',
comment = "##")
```
```r
library(showtext)
showtext_auto(enable = TRUE)
font_add("ShineTypewriter", regular = "./ShineTypewriter-lgwzd.ttf")
library(hexSticker)
library(magick)
sticker(
subplot = "./bg2.png",
s_x = 0.990,
s_y = 1.165,
s_width = .50,
s_height = .50,
package = "geocomplexity",
p_family = "ShineTypewriter",
p_size = 10.5,
p_color = ggplot2::alpha("#efd298",.95),#ggplot2::alpha("#3e3221",.75),
p_x = 1.00,
p_y = 0.585,
dpi = 300,
asp = 1,
h_size = 1.75,
h_color = ggplot2::alpha("#efd298",.95),#ggplot2::alpha("#8297a0",.95),
h_fill = ggplot2::alpha('#172a38',1),
white_around_sticker = F,
url = "https://ausgis.github.io/geocomplexity",
u_color = ggplot2::alpha("#efd298",.95),
u_size = 4.2,
filename = "geocomplexity_logo.png"
)
image_read('./geocomplexity_logo.png') |>
image_resize("240x278")|>
image_write('./geocomplexity_logo.png')
```
![](./geocomplexity_logo.png)