私はこのデータフレームを持っています:
set.seed(50)
data <- data.frame(age=c(rep("juv", 10), rep("ad", 10)),
sex=c(rep("m", 10), rep("f", 10)),
size=c(rep("large", 10), rep("small", 10)),
length=rnorm(20),
width=rnorm(20),
height=rnorm(20))
このデータフレームを使用して、各因子変数に対して各連続変数をプロットする 9 つの散布図を作成する必要があります。したがって、これらの散布図を作成する必要があります。
library(ggplot2)
ggplot(data, aes(length, width, group=age, colour=age)) + geom_point()
ggplot(data, aes(length, height, group=age, colour=age)) + geom_point()
ggplot(data, aes(width, height, group=age, colour=age)) + geom_point()
ggplot(data, aes(length, width, group=sex, colour=sex)) + geom_point()
ggplot(data, aes(length, height, group=sex, colour=sex)) + geom_point()
ggplot(data, aes(width, height, group=sex, colour=sex)) + geom_point()
ggplot(data, aes(length, width, group=size, colour=size)) + geom_point()
ggplot(data, aes(length, height, group=size, colour=size)) + geom_point()
ggplot(data, aes(width, height, group=size, colour=size)) + geom_point()
ただし、関数を使用してこれらの 9 つの散布図を作成できるようにしたいと考えています。このようなもの:
makeScatterplots <- function(x.variable, y.variable, my.factor){
ggplot(dataframe, aes(x.variable, y.variable, group=my.factor, colour=my.factor)) + geom_point()
}
これらの 9 つの散布図を計算する x 変数、y 変数、およびグループ化係数を取る関数を作成するにはどうすればよいですか?