Header = function(el)
  return {el, el}
end

{el, el}はテーブル

Rのリストに近い存在 (list(el, el))

Header = function(el)
  return {}
end

nilを返すとelを無加工で返した場合と同等な点に注意

Header = function(el)
  el.level = el.level + 1
  return el
end

• el.levelはRのel$levelに相当
• el["level"]でも良い。これはRのel[["level"]]に相当
• 要素がどんなフィールドを持つかはドキュメントを見る
  • Header
    • level
    • content
    • attr
    • …

Header = function(el)
  return pandoc.Para(el.content)
end

• pandocはモジュールの一種
  • 最初から読み込まれている
  • 追加読み込みで様々なモジュールが利用可能（例えばpandoc.utils）
  • パッケージの中身は.演算子や[演算子で取り出す
    • Rならpandoc::Para
• pandoc.Paraは段落（Paragraph）を作成する関数
  • コンストラクタとも
  • pandoc.Para関数は第一引数に文章としての中身（inline content）を受け取るので、Headerオブジェクトの.contentをわたせばいい
  • 各コンストラクタの引数の説明はドキュメントを参照
    • Header
    • Para

Header = function(el)
  el.content = pandoc.Strong(el.content)
  return el
end

Header = function(el)
  -- レベルが2以上なら無加工で返す
  if el.level >= 2 then
    return el
  end

  -- さもなくば強調して返す
  el.content = pandoc.Strong(el.content)
  return el
end

Header = function(el)
  if el.level >= 2 then
    -- レベルが2以上なら無加工で返す
    return el
  else
    -- さもなくば強調して返す
    el.content = pandoc.Strong(el.content)
    return el
  end
end

Header = function(el)
  --[[ 見出しレベルが2以上なら何もしない ]]
  if el.level >= 2 then
    return el
  end

  -- ☆で始まるcontentを用意
  local content = {pandoc.Str("☆")}

  -- el.contentはテーブル
  -- el.conetntの各要素をcontentにつけ加える
  for i, v in ipairs(el.content) do
    content[i + 1] = v
  end

  -- 完成したcontentでel.contentを上書きして返す
  el.content = content
  return el
end

• すべての見出しに目印を改変
  • すべての見出しを強調 -> レベル1の見出しを強調と同様にif文を加えて処理を条件付け
  • el.levelが1の時だけ目印をつける

--[[ 章番号を初期化 ]]
local n = 0

Header = function(el)
  -- 見出しレベルが2以上なら何もしない
  if el.level >= 2 then
    return el
  end

  --[[ 章番号を更新 ]]
  -- Rの n <<- n + 1 に相当
  n = n + 1

  --[[ 章番号を持つcontentを初期化 ]]
  local content = {
    pandoc.Str(
      -- Rの paste0("第", n "章：") に相当
      "第" .. n .. "章："
    )
  }

  -- contentにel.contentの要素をつけ加える
  for i, v in el.content do
    content[i + 1] = v
  end

  -- 完成したcontentでel.contentを上書きし、返す
  el.content = content
  return el
end

• 先の例の「☆」の代わりに「第n章：」を頭につけたい
• ただし、nは可変な数値
  • Luaでは..演算子で文字列や数値を文字列に結合できる
    • pandoc.Str("第" .. n .. "章：")
  • nはレベル1の見出しを処理する毎にカウントを増やす
    • local n = 0として関数の外で初期化し、関数実行時に1足した値で上書きしていく
    • 雑に説明すると
      • Luaのlocal n = 0はRのn <- 0
      • Luaのn = 0はRのn <<- 0
      • 基本はlocalを使って初期化すること
        • ただしHeader関数などのフィルタはスクリプトの外でPandocが使いたいのでlocalをつけない