私はRに少し慣れていないため、学習しようとしていますが、つまずいた問題を修正する方法について混乱しています。ファイルごとに 1 つのヒストグラムを作成できるように、複数のファイルを入力しようとしています。このコードは、特にファイルが 1 つだけの場合はうまく機能しますが、複数のファイルを入力すると問題が発生しました。
編集:終了コード
library("scales")
library("tcltk")
File.names<-(tk_choose.files(default="", caption="Choose your files", multi=TRUE, filters=NULL, index=1))
Num.Files<-NROW(File.names)
dat <- lapply(File.names,read.table,header = TRUE)
names(dat) <- paste("f", 1:length(Num.Files), sep="")
tmp <- stack(lapply(dat,function(x) x[,14]))
require(ggplot2)
ggplot(tmp,aes(x = values)) +
facet_wrap(~ind) +
geom_histogram(aes(y=..count../sum(..count..)))