プレゼン資料を作る時にいつも迷うのが配色です。注目してほしい項目に派手な色を使用すると、今度は全体のバランスが取れず内容が伝わりにくくなったりします。
赤と黒などの２色のみを使用したシンプルなプレゼン資料もありですが、同じ内容でも適切に色を使用すると強烈に印象が残る資料になることがあります。
効果的に色を使うには、3〜4色をコンセプトや心理的イメージなどから考え組み合わせると良いと言われています。でも、何か理論的な方法論が多く実務になかなか応用することは難しいです。
そこで、3〜4色の組み合わせ候補として、アニメのキャラクターの髪の色などをまとめてみました。アニメで使用される色の組み合わせは非常に参考になります。複数の髪の色が異なるキャラクターが同じ画面に登場してもバランスが取れていると思います。また、髪の色以外に瞳の色も参考になるかもしれません。
髪の色などのHTMLカラーコードは、オフィシャルホームページにある画像をフォトショップのスポイトで「見た目でザクッと使用率が高い色」をチェックしたものです。正式な設定資料とは異なりますのでご注意ください。
まとめてみると意外と使えるカラーパレットかなと思います。
また、参考までに「髪の色.csv」と髪の色.csvからカラーパレットを出力するRのコマンドを紹介します。
タイトル、キャラクターとカラーコード
「アニメタイトル ８作品」
花咲くいろは、氷菓、境界の彼方、響けユーファイム、シャーロット、ダンジョンに出合いを求めるのは間違っているだろうか、俺物語!!、四月は君の嘘
| タイトル | 名前 | カラーコード |
|---|---|---|
| 花咲くいろは | 松前緒花 | #d9bb9c |
| 花咲くいろは | 鶴来民子 | #756c6d |
| 花咲くいろは | 押水菜子 | #807765 |
| 花咲くいろは | 和倉結菜 | #ad8a80 |
| 氷菓 | 福部里志 | #685432 |
| 氷菓 | 折木奉太郎 | #464031 |
| 氷菓 | 千反田える | #28231e |
| 氷菓 | 伊原摩耶花 | #563c22 |
| 境界の彼方 | 栗山未来 | #deb7a0 |
| 境界の彼方 | 神原秋人 | #dcc995 |
| 境界の彼方 | 名瀬美月 | #505050 |
| 境界の彼方 | 名瀬博臣 | #4a4e4b |
| 境界の彼方 | 新堂愛 | #90736a |
| 響けユーファイム | 黄前久美子 | #8a5136 |
| 響けユーファイム | 川島緑輝 | #c19c6f |
| 響けユーファイム | 加藤葉月 | #62513d |
| 響けユーファイム | 高坂麗奈 | #252330 |
| シャーロット | 乙坂有宇 | #6e5f72 |
| シャーロット | 友利奈緒 | #e3deda |
| シャーロット | 高城丈士郎 | #a4a8c5 |
| シャーロット | 西森柚咲 | #fdeca4 |
| ダンジョンに出合いを求めるのは間違っているだろうか | ベル・クラネル | #e1e6ea |
| ダンジョンに出合いを求めるのは間違っているだろうか | ヘスティア | #505457 |
| ダンジョンに出合いを求めるのは間違っているだろうか | 例のヒモ | #4b61ba |
| ダンジョンに出合いを求めるのは間違っているだろうか | リリカル・アーデ | #a87963 |
| 俺物語!! | 剛田猛男 | #3d3532 |
| 俺物語!! | 大和凛子 | #e9ac8f |
| 俺物語!! | 砂川誠 | #e5b285 |
| 俺物語!! | ロゴ | #ff764d |
| 四月は君の嘘 | 宮園かをり | #ffdd99 |
| 四月は君の嘘 | 有馬公正 | #464d54 |
| 四月は君の嘘 | 澤部椿 | #8c5c40 |
| 四月は君の嘘 | 渡亮太 | #af7520 |
カラーパレット
参考：カラーパレットを出力するRのコマンド
アニメ４作品ごとに出力されます。コマンドは全く工夫していません。
library("tcltk")
selectACsv <- paste(as.character(tkgetOpenFile(title = "csvファイルを選択",filetypes = '{"csvファイル" {".csv"}}',initialfile = "*.csv")), sep = "", collapse =" ")
Data <- read.csv(selectACsv, header = TRUE, sep = ",", na.strings = "", stringsAsFactors = FALSE, fileEncoding="CP932")
#MACで日本語文字化け防止
#par(family = "HiraKakuProN-W3")
layout(matrix(c(1, 2, 3, 4), 2, 2, byrow = TRUE), respect = TRUE)
par(mar = c(1.3, 1, 1, 1))
#花咲くいろは
pie(rep(1, 4), labels = Data[1:4, 2], col = Data[1:4, 3], main = unique(Data[1:4, 1]))
#氷菓
pie(rep(1, 4), labels = Data[5:8, 2], col = Data[5:8, 3], main = unique(Data[5:8, 1]))
#境界の彼方
pie(rep(1, 5), labels = Data[9:13, 2], col = Data[9:13, 3], main = unique(Data[9:13, 1]))
#響けユーファイム
pie(rep(1, 4), labels = Data[14:17, 2], col = Data[14:17, 3], main = unique(Data[14:17, 1]))
#シャーロット
pie(rep(1, 4), labels = Data[18:21, 2], col = Data[18:21, 3], main = unique(Data[18:21, 1]))
#ダンジョンに出合いを求めるのは間違っているだろうか
pie(rep(1, 4), labels = Data[22:25, 2], col = Data[22:25, 3], main = unique(Data[22:25, 1]),
cex = 0.6, cex.main = 0.6)
#俺物語!!
pie(rep(1, 4), labels = Data[26:29, 2], col = Data[26:29, 3], main = unique(Data[26:29, 1]))
#四月は君の嘘
pie(rep(1, 4), labels = Data[30:33, 2], col = Data[30:33, 3], main = unique(Data[30:33, 1]))
少しでも、あなたのウェブや実験の解析が楽になりますように！！
