情報教育 - 奥村研究室

2010-11-27 15:30–16:00 統数研
TEX ＋
奥村晴彦
美文書・美
作成
三重大学教育学部教授（情報教育）
三重大学大学院地域
学研究科教授
三重大学高等教育創造開発
教授
三重大学総合情報処理
教授
三重大学学長補佐（情報担当）
［改訂第 5 版］
LATEX 2ε
美文書作成入門
（2010）
幻
（1986）
解析本
懐
（1996）
Lisp-Stat 本
pTEX
進化
1987
1990
1993
1994
1995
2000
2008
2010
ASCII 日本語 TEX
pTEX
JIS X 4051「日本語文書 行組版方法」
pTEX 用 JIS 準拠
pTEX 3.0，pLATEX 2ε
新
（jsarticle 等）
ε -pTEX（e-pTeX）
TEX Live 2010 入 （ε -pTEX
）
新
\documentclass{jsarticle}
\begin{document}
…
\end{document}
JIS
和文 適
選
組 方
，
JIS X 4051 準拠
昔の min10 フォントメトリック
“ ちょっと ”、「チェック」。
JIS X 4051 に準拠した jis フォントメトリック
“ちょっと”、「チェック」
。
行長・
（Word
量
TEX
全角
整数倍
）
-
20.5zw
。
揃
和文
行間
欧文
広
書籍book
和文
間 広
文字 高
必要
平均値
大
行
段落
頭
引用符 扱
jarticle
「
」
jsarticle
「
」
昔
•
•
•
•
TEX
最終産物 PostScript
画像 EPS 取 込
欧文
埋 込
和文
2 書体，名前参照
– Ryumin-Light
– GothicBBB-Medium
埋
込
大丈夫？
大丈夫
，問題
。
和文
埋 込
JIS2004 前後 字形 変
78JIS → 83JIS
U+8FBB
U+845B
U+7947
…
悪夢 再来
辻\CID{3056}
葛\CID{1481}
祇\CID{1626}
\CID{8267}
\CID{7652}
\CID{7659}
otf.sty
使
組 ，
埋 込
安心
\documentclass{jsarticle}
\usepackage{otf}
\begin{document}
\CID{7652}飾区 \CID{1481}城市
\end{document}
飾区
葛城市
，埋
込
（非 TEX）
情報処理学会全国大会 2010
http://www.ipsj.or.jp/10jigyo/taikai/72kai/paper_require.html
情報処理学会全国大会 2011
３．PDF 作成
投稿
PDF
，Windows
Macintosh 対応 DVD-ROM 掲載
，必
埋 込
PDF 作
成願
．
（作成時
高品
質
品質 選択
．
）．
http://www.ipsj.or.jp/10jigyo/taikai/73kai/paper_require.html
今
TEX
• 最終産物 PDF
• 画像 PDF，PNG，JPEG
• 和文 多書体
•
埋 込
和文
埋 込
違
，
取
込
数百 K
埋
込
違反？
。文科省
。
“
商用利用可能
Mac OS X
私
、
商用利用
発売
、
。
関
、Mac OS X
製品担当者
対
確認
新
行
。
現在
関
Mac OS X Leopard
、Mac OS X Leopard World
、Apple
同 事 質問 、
「
禁止
下
自体 配布
、Mac OS X
能 、許可申請
課長 櫻場浩氏
必要
含
行為
商用利用
。
」 回答 得
。一部 商用 使
」 話
転売
OS
可
「
、仕事 使
使
呼
OS
”
。
http://www.macotakara.jp/blog/index.php?ID=665
大日本
三橋洋一
@ymihashi
Twitter
教
心配
IPA
使
IPAex
Windows
設定済
同梱，
埋 込
dvipdfmx
rml
gbm
map
（cid-x.map 等）
H
H
!Ryumin-Light
!GothicBBB-Medium
H
H
ipam.ttf
ipag.ttf
↓
rml
gbm
ipaexm.ttf
ipaexg.ttf
$TEXMF/fonts/truetype
（mktexlsr
必要
）
美しい日本の書体
ඒ͍͠೔ຊͷॻମ
ඒ͍͠೔ຊͷॻମ
上
順
明朝 ProN W3，IPA 明朝，MS 明朝
dvi
• 海外
• 日本
• 画像
高速）
古
！
pdfTEX 普通
（ε -）pTEX ＋ dvipdfmx
PDF・PNG・JPEG 用意
Ghostscript 走
（
PDF
更新時
再読
込
：
•
（Mac OS X 付属）
• Sumatra PDF（
，Windows）
PDF
統合環境：
• TeXShop（Mac）
• TeXworks（Windows・Mac・Linux）
TeXworks
和文埋 込
必須
PDF
• Mac Quartz 機能 PDF 保存
• pdf() PDF 保存
• postscript() EPS 保存 ，
Ghostscript
PDF 変換
Mac
Quartz
作画
地域 = c("北海道","本州","四国","九州","沖縄")
面積 = c(83457,231112,18792,42190,2276)/10000
par(family="HiraKakuProN-W3")
par(las=1)
par(mgp=c(2,0.8,0))
barplot(面積, names.arg=地域)
axis(2, labels=expression(
paste("面積（万", km^2, "）")),
at=20, hadj=0.3, padj=-1, tick=FALSE)
2
面積（万km ）
20
15
10
5
0
北海道
本州
四国
九州
沖縄
EPS → PDF（埋 込
設定次第）
setEPS()
postscript("area2.eps",
family="Japan1GothicBBB")
par(las=1)
par(mgp=c(2,0.8,0))
barplot(面積, names.arg=地域)
axis(2, labels=expression(
paste("面積（万", km^2, "）")),
at=20, hadj=0.3, padj=-1, tick=FALSE)
dev.off()
2
面積（万km）
20
15
10
5
0
北海道
本州
四国
九州
沖縄
PDF（
埋
込
）
pdf("area3.pdf",
family="Japan1GothicBBB")
par(las=1)
par(mgp=c(2,0.8,0))
barplot(面積, names.arg=地域)
axis(2, labels=expression(
paste("面積（万", km^2, "）")),
at=20, hadj=0.3, padj=-1, tick=FALSE)
dev.off()
2
面積（万km ）
20
15
10
5
0
北海道
本州
四国
九州
沖縄
Illustrator
開
…
2
2
2
面積（万km ） 面積（万km） 面積（万km ）
20
20
20
15
15
15
負号
Quartz
quartz(width=7, height=5)
x = seq(-3.5, 1.5, by=0.1)
y = dnorm(x)
par(las=1)
par(mgp=c(2,0.8,0))
plot(NULL, xlim=c(-3.5,3.5), ylim=c(0,0.4),
xlab="", ylab="")
polygon(c(x,rev(x)), c(rep(0,51),rev(y)),
col="gray")
curve(dnorm, lwd=2, add=T)
0.4
0.3
0.2
0.1
0.0
-3
-2
-1
0
1
2
3
EPS・PDF
正常
pdf("dnorm2.pdf", width=7, height=5)
……
dev.off()
setEPS()
postscript("dnorm2.eps", width=7, height=5)
……
dev.off()
0.4
0.3
0.2
0.1
0.0
−3
−2
−1
0
1
2
3
R
embedFonts("hoge.pdf")
埋
込
。
embedFonts("hoge.pdf",
options="-dPDFSETTINGS=/prepress")
埋 込
（/printer
）
LATEX 文書 挿入
\documentclass{jsarticle}
\usepackage[dvipdfmx]{graphicx}
\begin{document}
\includegraphics[width=5cm]{hoge.pdf}
\end{document}
PDF
dvipdfmx extractbb
書 出
（mediabb.sty 使 方法 ）
*.xbb
LATEX
昔
今
数式
重 書
PSfrag 使
overpic.sty
。
便利。
\includegraphics[...]{hoge.pdf}
↓
\begin{overpic}[grid,tics=5,...]{hoge.pdf}
\end{overpic}
0.4
0.3
0.2
0.1
0.0
−3
−2
−1
0
1
2
3
0 5 10 15 20 25 30 35 40 45 50 55 60 65 70 75 80 85 90 95 100
65
65
60 0.4
55
60
50
50
45
55
0.3
45
40
40
35 0.2
35
30
30
25 0.1
20
25
15
15
10
5
20
0.0
10
−3
−2
−1
0
1
2
3
5
0
0
0 5 10 15 20 25 30 35 40 45 50 55 60 65 70 75 80 85 90 95 100
\begin{overpic}[grid,tics=5,...]{hoge.pdf}
\end{overpic}
↓
\begin{overpic}[grid,tics=5,...]{hoge.pdf}
\put(62,53){$f(x) = ...$}
\put(36,20){\colorbox{white}{$F(x) = ...$}}
\end{overpic}
0 5 10 15 20 25 30 35 40 45 50 55 60 65 70 75 80 85 90 95 100
65
65
60 0.4
55
60
50
45
1 −x2/2
f (x) = √ e
2π
0.3
55
50
45
40
40
35 0.2
35
30
30
∫ x
25 0.1
20
F(x) =
15
10
5
−∞
25
f (t)dt
20
15
0.0
10
−3
−2
−1
0
1
2
3
5
0
0
0 5 10 15 20 25 30 35 40 45 50 55 60 65 70 75 80 85 90 95 100
\begin{overpic}[grid,tics=5,...]{hoge.pdf}
\put(62,53){$f(x) = ...$}
\put(36,20){\colorbox{white}{$F(x) = ...$}}
\end{overpic}
↓
\begin{overpic}[...]{hoge.pdf}
\put(62,53){$f(x) = ...$}
\put(36,20){\colorbox{white}{$F(x) = ...$}}
\end{overpic}
0.4
1 −x2/2
f (x) = √ e
2π
0.3
0.2
∫ x
0.1
F(x) =
−∞
f (t)dt
0.0
−3
−2
−1
0
1
2
3
［緩募］以上 手続
半自動化
凡例 位置 R 知
overpic 環境 含
出力
。
仕組
，R
統計
色
• Ross Ihaka, “Colour for Presentation
Graphics,” DSC 2003.
• Achim Zeileis, Kurt Hornik and Paul
Murrell, “Escaping RGBland: Selecting
colors for statistical graphics,”
Computational Statistics & Data Analysis
53 (2009).
R
barplot(rep(1,8),col=palette(),axes=FALSE)
原色
！
3D
library(colorspace)
plot(NULL, xlim=c(0,4), ylim=c(0,2), axes=FALSE,
xlab="", ylab="")
rect(0:3, 1.1, 1:4, 2, col=rainbow(4,gamma=2.2))
rect(0:3, 0, 1:4, 0.9, col=rainbow_hcl(4,gamma=2.2))
色
頼
！
画面
色
rgb，印刷 色
gray
cmyk
pdf("hoge.pdf", width=7, height=5,
colormodel="gray") #
印刷
pdf("hoge.pdf", width=7, height=5,
colormodel="cmyk") #
印刷
RGB
黒 CMYK
危険
自動変換
K
印刷
Cleveland (1994)
表
（Cleveland
(c,m,y,k)
(1,0,0,0)
(0,1,0,0)
(1,0,1,0)
(0,0.5,1,0)
(1,0.5,0,0)
便利
薦 ）
rrggbb*
00a0e9
e4007f
009944
f39800
0068b7
* Photoshop CS5 Japan Color 2001 Coated
** Cleveland light blue 書
CMYK
色名
cyan
magenta
green
orange
royal blue**
sRGB
変換
色
Lidwell et al., Universal Principles of Design (2003), p.43
連続量 表
（Cleveland
便利 色
薦 ）
(0,1.0,0,0)
(0,0.8,0,0)
(0,0.6,0,0)
(0,0.4,0,0)
(0,0.2,0,0)
(0.2,0,0,0)
(0.4,0,0,0)
(0.6,0,0,0)
(0.8,0,0,0)
(1.0,0,0,0)
青
(0,0.5,1.0,0)
(0,0.4,0.8,0)
(0,0.3,0.6,0)
(0,0.2,0.4,0)
(0,0.1,0.2,0)
(0.2,0.1,0,0)
(0.4,0.2,0,0)
(0.6,0.3,0,0)
(0.8,0.4,0,0)
(1.0,0.5,0,0)
ORANGE / BLUE
Stephen Few, Now You See It (2009)
ORANGE / BLUE
Hastie et al., The Elements of Statistical Learning, 2nd ed. (2008)
色
頼
Tufte (1983)
文芸的
Knuth (1983): WEB
Ramsey (1989): noweb
Leisch (2002): Sweave
http://www.statistik.lmu.de/~leisch/Sweave/
Ihaka (2009): “Customizing Sweave to
Produce Better Looking LATEX Output”
http://www.stat.auckland.ac.nz/~ihaka/?Papers_and_Talks
Sweave
例：foo.Snw
\documentclass{jsarticle}
\begin{document}
一様乱数
5個作
<<>>=
x = runif(5)
x
mean(x)
@
\end{document}
平均
。
R
：
> Sweave("foo.Snw")
Writing to file foo.tex
Processing code chunks ...
1 : echo term verbatim
’foo.tex’
対
LaTeX
実行
一様乱数
5 個作
平均
。
> x = runif(5)
> x
[1] 0.90569849 0.74183724 ...
> mean(x)
[1] 0.6955517
EPS
要
勝手
整形
\SweaveOpts{eps=FALSE,keep.source=TRUE}
Ihaka
推奨
\DefineVerbatimEnvironment{Sinput}{Verbatim}{}
\DefineVerbatimEnvironment{Scode}{Verbatim}{}
\fvset{listparameters
={\setlength{\topsep}{0pt}},
xleftmargin=2em}
\renewenvironment{Schunk}
{\vspace{\topsep}}{\vspace{\topsep}}
日本語
• 左
• jsarticle
R
全角 整数倍
本文行送
16pt
12pt 減
\fvset{xleftmargin=2zw,baselinestretch=0.75}