data("Journals",package="AER") dim(Journals) names(Journals)