knitr::opts_chunk$set(
  collapse = TRUE,
  comment = "#>",
  warning = FALSE,
  message = TRUE,
  out.width = "100%"
)

Data preparation

library(massdataset)
library(tidyverse)
library(massstat)
data("liver_aging_pos")
liver_aging_pos

Scaling

liver_aging_pos[1,] %>% 
  extract_expression_data() %>% 
  as.numeric() %>% 
  density() %>% 
  plot()
liver_aging_pos[1,] %>% 
  scale_data(center = TRUE, method = "auto") %>% 
  extract_expression_data() %>% 
  as.numeric() %>% 
  density() %>% 
  plot()
liver_aging_pos[1,] %>% 
  scale_data(center = TRUE, method = "range") %>% 
  extract_expression_data() %>% 
  as.numeric() %>% 
  density() %>% 
  plot()
liver_aging_pos[1,] %>% 
  scale_data(center = TRUE, method = "pareto") %>% 
  extract_expression_data() %>% 
  as.numeric() %>% 
  density() %>% 
  plot()

Session information

sessionInfo()


jaspershen/massstat documentation built on March 14, 2024, 7:02 p.m.