In sbalci/ClinicoPathJamoviModule: Analysis for Clinicopathological Research

knitr::opts_chunk$set(
  collapse = TRUE,
  fig.width = 6,
  fig.height = 4,
  comment = "#>"
)

library(ClinicoPath)

data("histopathology")

#| glimpse histopathology

dplyr::glimpse(histopathology)

ClinicoPath::agepyramid(
    data = histopathology,
    age = Age,
    gender = Sex,
    female = "Female")

age_pyramid <-
ClinicoPath::agepyramid(
    data = histopathology,
    age = Age,
    gender = Sex,
    female = "Female")

age_pyramid$pyramidTable

age_pyramid$pyramidTable$asDF

age_pyramid$plot

age_pyramid$plot$state

age_pyramid$plot$plot

temp_file_png <- tempfile(fileext = ".png")
age_pyramid$plot$saveAs(paste0(temp_file_png, ".png"))

age_pyramid_plot <- png::readPNG(paste0(temp_file_png, ".png"))

temp_file_tiff <- tempfile(fileext = ".tiff")

tiff::writeTIFF(what = age_pyramid_plot,
                where = paste0(temp_file_tiff, ".tiff"),
                compression = "LZW")

htmlTable::htmlTable(
  kableExtra::kable(
    age_pyramid$pyramidTable$asDF
    ))

Age Pyramid

agepyramidClass

Age Pyramid

alluvial()

Alluvial Diagrams

alluvialClass

Alluvial Plot

benford()

Benford Analysis

crosstable()

Cross Tables

crosstableClass

Cross Table

histopathology

histopathology

reportcat()

Summary of Categorical Variables

reportcatClass

Summary of Categorical Variables

summarydata()

Summary of Continuous Variables

summarydataClass

Summary of Continuous Variables

tableone()

Table One

tableoneClass

Table One

venn()

Venn Diagram

vennClass

sbalci/ClinicoPathJamoviModule documentation built on Feb. 25, 2025, 6:34 a.m.