So-net無料ブログ作成

R: ggplot2でNoto Sansフォントをつかってみるテスト [統計]

ggplot2でNoto Sansフォントをつかってみるテストです。環境はmacOS 10.13、R 3.4.1です。

まずは適当なデータを用意します。

library(ggplot2)

set.seed(123)
Time <- 1:20
Y <- vector("numeric", length(Time))
Y[1] <- 0
for (i in 2:(length(Time) - 1)) {
  Y[i] <- Y[i - 1] + rnorm(1, 0, 1)
}
df <- data.frame(Time = Time, Y = Y)

q1 <- ggplot(df) +
  geom_line(aes(x = Time, y = Y)) +
  labs(title = "ランダムウォーク", x = "時間", y = "値")

Noto Sans CJK JP レギュラーです。

q1 + theme_gray(base_family = "NotoSansCJKjp-Regular")

plot1.png

Noto Sans CJK JP ボールドです。

q1 + theme_gray(base_family = "NotoSansCJKjp-Bold")

plot2.png

Noto Sans CJK JP ブラックです。

q1 + theme_gray(base_family = "NotoSansCJKjp-Black")

plot3.png


タグ:R ggplot2
nice!(2)  コメント(0) 
共通テーマ:日記・雑感

nice! 2

コメント 0

コメントを書く

お名前:
URL:
コメント:
画像認証:
下の画像に表示されている文字を入力してください。

Facebook コメント