Функции рисования в R - кривая функции

Разные системные каталоги шрифтов:

• Linux обычно находится в /usr/share/fonts Ниже, мы можем использовать команду fc-list, чтобы проверить:

  #　fc-list
  /usr/share/fonts/truetype/dejavu/DejaVuSerif-Bold.ttf:　DejaVu　Serif:style=Bold
  /usr/share/fonts/truetype/dejavu/DejaVuSansMono.ttf:　DejaVu　Sans　Mono:style=Book
  /usr/share/fonts/truetype/dejavu/DejaVuSans.ttf:　DejaVu　Sans:style=Book
  /usr/share/fonts/truetype/dejavu/DejaVuSans-Bold.ttf:　DejaVu　Sans:style=Bold
  /usr/share/fonts/truetype/dejavu/DejaVuSansMono-Bold.ttf:　DejaVu　Sans　Mono:style=Bold
  /usr/share/fonts/truetype/dejavu/DejaVuSerif.ttf: DejaVu Serif:style=Book

• Шрифты Windows находятся в C:\Windows\Fonts\ файле, его можно открыть напрямую и увидеть.

• Шрифты mac OS находятся в /System/Library/Fonts и /Library/Fonts в папке.

Системная библиотека шрифтов может быть проверена с помощью установки showtext:

> install.packages("showtext", repos = "https://mirrors.ustc.edu.cn/CRAN/") # Установка showtext
...
> font_files() # Проверка шрифтов
　　　　　　　　　　　　path file family face version
1 /Library/Fonts Arial Unicode.ttf Arial Unicode MS Regular Version 1.01x
　　　　　　　　　ps_name
1 ArialUnicodeMS

Увидев ArialUnicodeMS, мы можем использовать его:

pie3D(info, labels = names, explode = 0.1, main = "3D-диаграмма", family = "ArialUnicodeMS")

Загрузка пользовательских шрифтов

Иногда системная библиотека шрифтов не поддерживается очень хорошо, Функция showtext() может загружать наши пользовательские шрифты, можно загрузить пакет ttf и затем добавить их с помощью функции font_add().

Здесь мы используем Source Han Sans, Source Han Sans — это开源 шрифт, совместно推出的 Adobe и Google.

Официальный веб-сайт:https://source.typekit.com/source-han-serif/cn/

Адрес GitHub:https://github.com/adobe-fonts/source-han-sans/tree/release/OTF/SimplifiedChinese

Откройте ссылку и выберите один из них:

Можете загрузить OTF шрифт, например SourceHanSansSC-Bold.otf, и поместить этот файл в текущую папку с кодом:

График столбиков использует библиотеку шрифтов:

#　载入　showtext
library(plotrix);
library(showtext);
#　Первый параметр устанавливает имя шрифта, второй параметр - путь к библиотеке шрифтов, в одной папке, мы пишем имя библиотеки шрифтов　
cols = c("#ED1C24","#22B14C","#FFC90E","#3f48CC")
#　Загрузить showtext
png(file = "w3codebox-bar-cn.png")
png(file = "3d_pie_chart.png")
#　Загрузить шрифт
cvd19 = c(83534,2640626,585493)
　　　　barplot(c(cvd19,
　　　　main="Бар диаграмма COVID-19",
　　　　col=c("#ED1C24","#22B14C","#FFC90E"),
　　　　names.arg=c("Китай","США","Индия"),
family='SyHei'　#　Установить библиотеку шрифтов
pie3D(info,labels = names,explode = 0.1, main = "3D-диаграмма",family = "SyHei")
#　Удалить шрифт

)

Пример
library(plotrix);
library(showtext);
#　Первый параметр устанавливает имя шрифта, второй параметр - путь к библиотеке шрифтов, в одной папке, мы пишем имя библиотеки шрифтов
font_add("SyHei", "SourceHanSansSC-Bold.otf");
#　Подготовка данных
info = c(1, 2, 4, 8)
#　Именование
names = c("Google", "w3codebox", "Taobao", "Weibo")
#　Цветовая заливка (по желанию)
cols = c("#ED1C24","#22B14C","#FFC90E","#3f48CC")
#　Установить имя файла, вывод в файл png
png(file = "3d_pie_chart.png")
#　Загрузить шрифт
showtext_begin();
#　Нарисовать 3D-диаграмму
pie3D(info,labels = names,explode = 0.1, main = "3D-диаграмма",family = "SyHei")
#　Удалить шрифт
showtext_end();
#　Закрыть графическое устройство