如何重新格式化此山脊線圖,使其成為垂直山脊線圖?
我真正的資料集是實際的 PDF。對于一個最小的可重現示例,我生成分布并提取 PDF 以在虛擬函式中使用。資料框有一個模型名稱(用于分組)、與 PDF 縱坐標配對的 x 值,以及一個分隔不同山脊線級別(即山脊線 y 軸)的 id 欄位。
set.seed(123)
makedfs <- function(name, id, mu, sig) {
vals <- exp(rnorm(1000, mean=mu, sd=sig))
pdf <-density(vals)
model <- rep(name, length(pdf$x))
prox <- rep(id, length(pdf$x))
df <- data.frame(model, prox, pdf$x, pdf$y)
colnames(df) <- c("name", "id", "x", "pdf")
return(df)
}
df1 <- makedfs("model1", 0, log(1), 1)
df2 <- makedfs("model2", 0, log(0.5), 2)
df3 <- makedfs("model1", 1, log(0.2), 0.8)
df4 <- makedfs("model2", 1, log(1), 1)
df <- rbind(df1, df2, df3, df4)
從這個答案中,
我正在嘗試基于
轉載請註明出處,本文鏈接:https://www.uj5u.com/caozuo/524085.html
標籤:rggplot2山脊线图
