Столбчатая диаграмма для одной количественной и одной категориальной переменной

У меня есть фрейм данных следующим образом:

core_depth    formation_name
5668           name5
5739           name2
5791           name7
5841           name4
5856           name1
5876           name3
5882           name6

колонка core_depth представляет глубину породы, а formation_name-это название, данное горной формации геологами. Я скремблировал имена, чтобы защитить данные, но идея в том, что это уникальные имена, как в символьном векторе в R.

Мне нужно нарисовать столбчатую столбчатую диаграмму, где важен только вертикальный масштаб. Он начинается на первом core_depth (5668) в верхней части и заканчивается на глубине ядра (5882) в нижней части. Каждый стек на гистограмме показывает «пропорцию» глубины, соответствующую названию. Мне не нужна легенда, так как сам столбик служит маркером глубины и образования для других точечных диаграмм. Я могу использовать ggplot2 или plotly. Пожалуйста посоветуйте или улучшайте, дайте код образца.

1 ответ

  1. Помогает ли это:

    df <- read.table(text = "core_depth    formation_name
                     5668           name5
                     5739           name2
                     5791           name7
                     5841           name4
                     5856           name1
                     5876           name3
                     5882           name6", stringsAsFactors = FALSE, header = TRUE)
    
    library(dplyr)
    library(ggplot2)
    
    df <- df %>% 
      arrange(core_depth)
    
    df$lag <- lag(df$core_depth)
    
    df$abs <- df$core_depth - df$lag
    df$abs[1] <- 0
    
    ggplot(df) +
      geom_bar(aes(x = rep(0, nrow(df)),
                   y = abs,
                   fill = formation_name),
               stat = "identity")
    

    Введите описание изображения здесь