長い引数リストの例

stat_bin <- function (
    mapping = NULL,
    data = NULL,
    geom = "bar",
    position = "stack",
    width = 0.9,
    drop = FALSE,
    right = FALSE,
    binwidth = NULL,
    origin = NULL,
    breaks = NULL,
    ...
    ) {
    StatBin$new(
        mapping = mapping,
        data = data,
        geom = geom,
        position = position,
        width = width,
        drop = drop,
        right = right,
        binwidth = binwidth,
        origin = origin,
        breaks = breaks,
        ...
        )
}


geom_boxplot <- function (
    mapping = NULL,
    data = NULL,
    stat = "boxplot",
    position = "dodge",
    outlier.colour = NULL,
    outlier.shape = NULL,
    outlier.size = NULL,
    notch = FALSE,
    notchwidth = .5,
    varwidth = FALSE,
    ...
    )
# 省略