Rのスライダーを使用して、複数のデータフレームのヒートマップをプロットします

debugcn 投稿 Dev

LDT

私は複数のdata.framesを持っており、それぞれが異なる時点での個人のペアワイズ相互作用を表しています。

これが私のdata.framesがどのように見えるかの例です。

df1 <- matrix(data = rexp(9, rate = 10), nrow = 3, ncol = 3)
df2 <- matrix(data = rexp(16, rate = 10), nrow = 4, ncol = 4)
df3 <- matrix(data = rexp(4, rate = 10), nrow = 2, ncol = 2)

このページ（https://plotly.com/r/sliders/）で指摘されているように、それらをプロットしたいと思います。スライダーを使用すると、あるヒートマップから別のヒートマップに移動できます。

私はこれまでプロットで試しましたが、成功しませんでした。どんな助けでも大歓迎です。

私はこの問題に長い間苦労しています。この時点で私は少し盲目かもしれないので、質問が愚かであるならば私を許してください。

ステファン

https://plotly.com/r/sliders/のSine Wave Slider例に従うと、これは次のように実現できます。私のアプローチの最初のステップは、行列を列x、y、zのデータフレームに変換することです。次に、線の代わりにヒートマップをプロットします。

df1 <- matrix(data = rexp(9, rate = 10), nrow = 3, ncol = 3)
df2 <- matrix(data = rexp(16, rate = 10), nrow = 4, ncol = 4)
df3 <- matrix(data = rexp(4, rate = 10), nrow = 2, ncol = 2)

library(tibble)
library(tidyr)
library(plotly)

# Make dataframes
d <- lapply(list(df1, df2, df3), function(d) {
            d %>%
              as_tibble(.colnames = seq(ncol(.))) %>% 
              rowid_to_column("x") %>% 
              pivot_longer(-x, names_to = "y", values_to = "z") %>% 
              mutate(y = stringr::str_extract(y, "\\d"),
                     y = as.numeric(y))
    })

aval <- list()
for(step in seq_along(d)){
  aval[[step]] <-list(visible = FALSE,
                      name = paste0('v = ', step),
                      x = d[[step]]$x,
                      y = d[[step]]$y,
                      z = d[[step]]$z)
}
aval[1][[1]]$visible = TRUE

steps <- list()
fig <- plot_ly()

for (i in seq_along(aval)) {
  fig <- add_trace(fig, x = aval[i][[1]]$x, y = aval[i][[1]]$y, z = aval[i][[1]]$z, visible = aval[i][[1]]$visible, 
                   name = aval[i][[1]]$name, type = "heatmap")
  fig
  step <- list(args = list('visible', rep(FALSE, length(aval))), method = 'restyle')
  
  step$args[[2]][i] = TRUE  
  steps[[i]] = step
}

fig <- fig %>%
  layout(sliders = list(list(active = 0,
                             currentvalue = list(prefix = "Heatmap: "),
                             steps = steps)))
fig

この記事はインターネットから収集されたものであり、転載の際にはソースを示してください。

侵害の場合は、連絡してください[email protected]

編集2021-06-12

コメントを追加

サインイン

分類Dev

Related 関連記事

記事

Rのスライダーを使用して、複数のデータフレームのヒートマップをプロットします

Rのスライダーを使用して、複数のデータフレームのヒートマップをプロットします

Rのデータフレームに基づいて複数のヒストグラムをプロットします

Rのヒートマッププロットとして3列のデータフレームからデータをプロットする方法は？

共有「x」を使用してデータフレームの複数の列をプロットします

パンダ機能を使用して複数のデータフレームをプロットする

Rのデータフレームのリストを使用してグラフをプロットする方法

Rのデータフレームのリストを使用してグラフをプロットする方法

データフレーム内の列のデータ型に基づいて、カウントプロットをプロットしたり、ヒストグラムをプロットしたりする関数を作成します

seaborn.pairplot（）を使用してデータフレームを複数の色でプロットしますか？

データフレームからforループを使用して複数のプロットを作成する

パンダデータフレームをヒートマップとして視覚化する際のタイプエラー

Rのリストを使用してデータフレームをマップします

時系列データフレームをプロットし、パンダとmatplotlibを使用して特定のポイントをマークします

パンダデータフレームの複数の行をプロットします

Rを使用してデータフレームのサブセットをプロットしますか？

異なる色のggplotを使用して複数のデータフレームをプロットする

Seabornを使用してパンダデータフレームの列の複数のグループを並べてプロットする方法

Rのforループを使用して多くのヒストグラムをプロットします

2列のパンダデータフレームの要素をヒストグラムとしてプロットする方法は？

特定の行のヘッダーを使用して、テキストファイルを複数のパンダデータフレームに分割します

Rデータフレームのすべての行の関数をプロットします

複数のアイテムをパンダデータフレームの値にマップします

パンダはデータフレームを複数の棒グラフとしてプロットします

1列のみで複数行のデータフレームのヒストグラムを作成する方法（行の値はx軸にプロットし、列の値はy軸にプロットする必要があります）

データフレームにseabornを使用してヒストグラムをプロットする

データフレームの列の値に基づいてヒストグラムをプロットします

パンダのデータフレームをlog10スケールのx軸を持つ複数のヒストグラムとしてプロットしたい

r-リーフレットを使用してデータフレームのリストにポリゴンをプロットします

ループを使用してRのggplot2を使用し、同じプロット内の同じデータフレームから複数のxyプロットを生成し、対応する凡例を表示します

pd.mergeを使用して、データフレーム内の複数の列の値を別のデータフレームからマップします