https://github.com/stscl/gdverse_logo
The logo of R package gdverse
https://github.com/stscl/gdverse_logo
Last synced: about 2 months ago
JSON representation
The logo of R package gdverse
- Host: GitHub
- URL: https://github.com/stscl/gdverse_logo
- Owner: stscl
- Created: 2024-06-07T03:36:22.000Z (11 months ago)
- Default Branch: main
- Last Pushed: 2024-10-16T07:26:11.000Z (6 months ago)
- Last Synced: 2025-01-11T14:18:44.946Z (4 months ago)
- Language: R
- Size: 1.32 MB
- Stars: 2
- Watchers: 1
- Forks: 0
- Open Issues: 0
-
Metadata Files:
- Readme: readme.md
Awesome Lists containing this project
README
``` r
library(showtext)
showtext_auto(enable = TRUE)
font_add("ShineTypewriter", regular = "./ShineTypewriter-lgwzd.ttf")
library(magick)
library(hexSticker)
sticker(
subplot = './logo1.png',
s_x = 0.97,
s_y = 0.98,
s_width = 1.5,
s_height = 1.5,
package = "gdverse",
p_family = "ShineTypewriter",
p_size = 25,
p_color = ggplot2::alpha("#ffffff",.85),
p_x = 1.05,
p_y = 1,
dpi = 300,
asp = 1,
h_size = 2.15,
h_color = ggplot2::alpha("#54564f",1),
h_fill = ggplot2::alpha('#ffffff',0),
white_around_sticker = T,
url = "https://stscl.github.io/gdverse",
u_color = "white",
u_size = 4.25,
filename = "gdverse_logo1.png"
)
# finally make gdverse_logo1.png background transparent
# https://uutool.cn/img-matting/
image_read('./gdverse_logo1.png') |>
image_resize("240x278") |>
image_write('./gdverse_logo.png')
```
**Thanks to `Cao Yue` for her help on background image extraction.**