Skip to content

This manual palette can handle a maximum of 10 values. You have supplied 12  #175

@arroe99

Description

@arroe99

微信图片_20240804114949

library(readxl)
df = read_excel("testcode.xls", sheet = 1, na = "NA")

long_df <- df %>%

  • pivot_longer(cols = everything(), names_to = "Region", values_to = "Value")

table(long_df$Region)

Central [NNS] Central [NS] Frontal [NNS] Frontal [NS]
200 200 200 200
Overall[NNS] Overall[NS] Parietal [NNS] Parietal [NS]
200 200 200 200
Prefrontal [NNS] Prefrontal [NS] Temporal [NNS] Temporal [NS]
200 200 200 200

idx <- list(

  • c("Overall[NS]", "Overall[NNS]"),
  • c("Prefrontal [NS]", "Prefrontal [NNS]"),
  • c("Frontal [NS]", "Frontal [NNS]"),
  • c("Temporal [NS]", "Temporal [NNS]"),
  • c("Central [NS]", "Central [NNS]"),
  • c("Parietal [NS]", "Parietal [NNS]")
  • )

dabest_obj <- long_df %>%

  • dabestr::load(x = Region, y = Value,
  •    idx = idx)
    

dabest_obj %>%

  • mean_diff() %>%
  • dabest_plot()
    Warning messages:
    1: This manual palette can handle a maximum of 10 values. You have supplied 12
    2: Removed 400 rows containing missing values or values outside the scale range
    (geom_point()).
    3: In get_plot_component(plot, "guide-box") :
    Multiple components found; returning the first one. To return all, use return_all = TRUE.
    4: This manual palette can handle a maximum of 10 values. You have supplied 12
    5: Removed 400 rows containing missing values or values outside the scale range
    (geom_point()).
    6: This manual palette can handle a maximum of 10 values. You have supplied 12

Metadata

Metadata

Assignees

No one assigned

    Labels

    No labels
    No labels

    Type

    No type

    Projects

    No projects

    Milestone

    No milestone

    Relationships

    None yet

    Development

    No branches or pull requests

    Issue actions