簡単だけど、そのものずばりが見つけられなかったので。 とりあえずirisで。x軸は適当にindexを振っておいて、これを共通の軸とする。y軸方向にはSpecies(とid)を除いた全部をプロットしたいので、列名に"."が含まれているものを取り出してプロットする感じで。 とりあえず捻りのないやり方で…。 library(ggplot2) library(magrittr) library(dplyr) # id振っておく iris_ <- iris %>% mutate(id=row_number()) # 下地を作っておく g <- ggplot(iris_, aes(x=id)) # 列名に条件を設けて取り出す。 coliris <- iris %>% select(contains(".")) %>% colnames() # for文でまわす for(i in coliris){ g