# タイトル
## 見出し（章）
章，節，項番号は自動的に振る
### 見出し（節）
これは節
### 見出し（節）
これは次の節
#### 見出し（項）

図表の番号を引用できるようになった。引用は figref，tabref タグによる。引用される図表には label タグでラベルを付け，引用はそのラベルを指定して行う。
未定義のラベルを参照すると ??? になる。例えば <figref undefined> のように。

複雑な記述は markdown にたよらず，html で書く

図のサイズは，デフォルトでは 400 X 300 ピクセルである。

今のところ，1 つのファイルの中では，同じサイズの図が作られる（図ごとに大きさは指定できない）。

図<figref histogram> はヒストグラム，図<figref scatter-plot> は散布図である。
図のキャプションは図の下に書くのが通例なので，プロット関数の後に fig タグで，caption 引数として書く。
引用のためのラベルは label タグを，fig タグの後に書く。
図の番号の引用は，引用したい場所に figref タグを置く。figref が label タグより前にあっても差し支えない。

```{r}
hist(rnorm(10000))
```
<fig caption="図のキャプションはこんな風に書く（本来はないタグ）">
<label histogram>

```{r}
plot(rnorm(10000), rnorm(10000), col="#00008020", pch=19)
```
<fig caption="図番号は自動的に振られる">
<label scatter-plot>

表<tabref table1> のような，table タグによって自分で作表する表のキャプションは，表の上に tab タグを書く。表番号は自動的に振られる。
表のキャプションは表の上に書くのが通例なので，tab タグで，caption 引数として書く。
引用のためのラベルは label タグを，tab タグの後に書く。
表の番号の引用は，引用したい場所に tabref タグを置く。tabref が label タグより前にあっても差し支えない。

<tab caption="表のキャプションは，caption タグではなく，このように書く">
<label table1>

<table border=1>
<tr> <td>aaa</td> <td>123</td> </tr>
<tr> <td>bbb</td> <td>456</td> </tr>
</table>

表<tabref knitr> のような，knitr() の作表命令による場合も tab タグによる。

<tab caption="表のキャプションは，caption タグではなく，このように書く">
<label knitr>

性別 | 20歳代 | 30歳代 | 40歳代 |
-----|--------|--------|--------|
男   | 42     |  71    | 85     |
女   | 38     |  75    | 46     |

表<tabref by-xtable>，<tabref by-xtable2> のように，xtable() も使えるが，実際の出力を行う print.xtable() は LaTeX 出力がデフォルトなので，html 出力のためには明示的に print.xtable() を使わなければならない。結果を出力するには，results="asis" を指定しなければならない。

echo=FALSE を指定しないと。表題と表の間に R プログラムが挿入されてしまうので，必ず，echo=FALSE を指定しなければならない。

<tab caption="xtable() による作表結果">
<label by-xtable>

```{r echo=FALSE, results="asis", tidy=FALSE}
d <- data.frame(id=sample(1000, 5),
                 x=rnorm(5),
                 y=LETTERS[1:5],
                 s=sample(month.abb, 5))
library(xtable)
print(xtable(d, digits=c(0, 0, 3, 0, 0)), type="html")
```

echo=FALSE でない場合は，xtable() の caption= と print.xtable() の caption.placement="top" を同時に指定する。この場合も，表の番号は自動的に振られる。
この場合に，label タグは xtable() の後に置く。

```{r results="asis", tidy=FALSE}
print(xtable(iris[1:5,], caption="print(xtable(), ...) による作表結果",
      digits=c(0, 1, 1, 1, 1, 0)), caption.placement="top", type="html")
```
<label by-xtable2>

数式の参照は knitr() の基本機能に含まれている。

「（\ref{test}）式を参照」のように行う。

\[
\label{test}
  V = \sum_{i=1}^n (x_i-\bar{x})^2 / n \tag{1}
\]
