Genshinpalette | 一款为原X准备的配色包

Genshinpalette

❝

小伙伴June写的配色R包，欢迎大家多多使用并提出宝贵意见。

❞

Genshinpalette 提供了一系列的调色盘，其灵感来源于原神配色

包安装

目前该包仅能从GitHub上进行安装，后期会不断进行优化完善，也请各位多提提建议和意见帮助包的优化改进:

remotes::install_github("Schwarzeneggerjune/Genshinpalette",force = T)

用法

目前该包中仅有三个简单的函数， get_character_name 函数可以获得原神角色的英文名称，可用于后面提取相应角色的主题色。Genshinpalette 函数能够提取对应角色的主题色，由于颜色提取具有一定的随机性，所以目前的配色可能不是太美观后期会进行人工优化更新， display_colors函数可以简单的展示调色板中的颜色。

char_name=get_character_name(Country = "All")#Country可以是原神中各国家
head(char_name,10)#若出现乱码请检查系统编码格式是否为UTF-8
  ALBEDO     ALOY    AMBER  BARBARA  BENNETT    DIONA    DILUC   FISCHL    KAEYA     KLEE 
"阿贝多" "埃洛伊"   "安柏" "芭芭拉" "班尼特" "迪奥娜" "迪卢克" "菲谢尔"   "凯亚"   "可莉" 
Genshinpalette('BARBARA',#角色名称
               6)#所需颜色个数，默认为6
[1] "#2C3350" "#727782" "#9C9997" "#BEB8BA" "#CDC2B9" "#F4EFEA"
display_colors('FISCHL')

Rplot04

library(ggplot2)
data("diamonds")
ggplot(
  subset(diamonds, carat >= 2.2),
  aes(x = table, y = price, colour = cut)
) +
  geom_point(alpha = 0.7) +
  geom_smooth(method = "loess", alpha = 0.05, size = 1, span = 1) +
  theme_bw()+
  scale_color_manual(values = Genshinpalette('JEAN'))

Rplot02

ggplot(
  subset(diamonds, carat > 2.3 & depth > 10 & depth < 100),
  aes(x = depth, fill = cut)
) +
  geom_histogram(colour = "black", binwidth = 1, position = "dodge") +
  theme_bw()+
  scale_fill_manual(values = Genshinpalette('GANYU'))

GANYU

调色板展示

组合6 组合7 组合8 组合9 组合10 组合2 组合3 组合5

往期内容

1. CNS图表复现|生信分析|R绘图 资源分享&讨论群！
   
2. 这图怎么画| 有点复杂的散点图
   
3. 这图怎么画 | 相关分析棒棒糖图
   
4. 组学生信| Front Immunol |基于血清蛋白质组早期诊断标志筛选的简单套路
   
5. (免费教程+代码领取)|跟着Cell学作图系列合集
   
6. Q&A | 如何在论文中画出漂亮的插图？
   
7. 跟着 Cell 学作图 | 桑葚图(ggalluvial)
   
8. R实战 | Lasso回归模型建立及变量筛选
   
9. 跟着 NC 学作图 | 互作网络图进阶(蛋白+富集通路)(Cytoscape)
   
10. R实战 | 给聚类加个圈圈(ggunchull)
    
11. R实战 | NGS数据时间序列分析(maSigPro)
    
12. 跟着 Cell 学作图 | 韦恩图(ggVennDiagram)