|
a |
|
b/sticker.R |
|
|
1 |
library(hexSticker) |
|
|
2 |
library(desc) |
|
|
3 |
desc = desc::description$new() |
|
|
4 |
package = desc$get("Package") |
|
|
5 |
url = desc$get("BugReports") |
|
|
6 |
url = sub("/issues.*", "", url) |
|
|
7 |
# outline = "#0caa41" |
|
|
8 |
outline = "#009E73" |
|
|
9 |
# background = "#0caa41" |
|
|
10 |
# background = "#7142f4" |
|
|
11 |
background = "black" |
|
|
12 |
# p_color = "black" |
|
|
13 |
sticker("icon.png", |
|
|
14 |
package = package, |
|
|
15 |
h_fill = background, |
|
|
16 |
h_color = outline, |
|
|
17 |
s_width = 0.4, |
|
|
18 |
s_height = 0.4, |
|
|
19 |
s_x = 1, |
|
|
20 |
url = url, |
|
|
21 |
u_color = "white", |
|
|
22 |
u_size = 1.25, |
|
|
23 |
filename = "sticker.png") |
|
|
24 |
|
|
|
25 |
|
|
|
26 |
usethis::use_build_ignore( |
|
|
27 |
c("icon.png", "sticker.R", "sticker.png")) |
|
|
28 |
usethis::use_logo("sticker.png") |