互いにプロットしたい2つのデータフレームがあります。
> df1 <- data.frame(HV = c(3,3,3), NAtlantic850t = c(0.501, 1.373, 1.88), AO = c(-0.0512, 0.2892, 0.0664))
> df2 <- data.frame(HV = c(3,3,2), NAtlantic850t = c(1.2384, 1.3637, -0.0332), AO = c(-0.5915, -0.0596, -0.8842))
それらは同一です。列と列(df1 $ HV、df2 $ HVなど)をプロットしたいと思います。データフレームの列をループして、散布図で相互にプロットします。
私は同様のことを尋ねる20以上の質問を調べましたが、それを理解することはできません-どこから始めればよいかについて助けていただければ幸いです。2つのDFの場合、lapplyとplotまたはggplotを使用できますか?最初にそれらをマージする必要がありますか?
ご提案のとおり、plotコマンドを呼び出す前に、まずプロット可能なデータフレームのリストに再配置します。data
引数をにフィードしたい場合は、特にそれが進むべき道だと思いますggplot
。何かのようなもの:
plot_dfs <- lapply(names(df1),function(nm)data.frame(col1 = df1[,nm], col2 = df2[,nm]))
for (df in plot_dfs)plot(x = df[,"col1"], y = df[,"col2"])
またはggplotを使用する:
for (df in plot_dfs){
print(
ggplot(data = df, aes(x=col1, y=col2)) +
geom_point())}
列名をプロットタイトルとして追加する場合は、次の操作を実行できます。
for (idx in seq_along(plot_dfs)){
print(
ggplot(data = plot_dfs[[idx]], aes(x=col1, y=col2)) +
ggtitle(names(df1)[idx]) +
geom_point())}
この記事はインターネットから収集されたものであり、転載の際にはソースを示してください。
侵害の場合は、連絡してください[email protected]
コメントを追加