The hardware and bandwidth for this mirror is donated by METANET, the Webhosting and Full Service-Cloud Provider.
If you wish to report a bug, or if you are interested in having us mirror your free-software or open-source project, please feel free to contact us at mirror[@]metanet.ch.
library(DigestiveDataSets)
library(ggplot2)
library(dplyr)
#>
#> Adjuntando el paquete: 'dplyr'
#> The following objects are masked from 'package:stats':
#>
#> filter, lag
#> The following objects are masked from 'package:base':
#>
#> intersect, setdiff, setequal, union
The DigestiveDataSets
package offers a comprehensive and
curated collection of datasets focused on the digestive system,
including the stomach, intestines, liver, pancreas, and related
disorders. This package encompasses a variety of data types
such as clinical trials, observational studies, experimental datasets,
cohort data, and case series, providing broad coverage of
gastrointestinal diseases.
Included datasets span a range of conditions such as gastritis, ulcers, pancreatitis, liver cirrhosis, colorectal diseases, colon cancer, Helicobacter pylori infection, irritable bowel syndrome, intestinal infections, and post-surgical outcomes. These datasets serve multiple purposes in education, clinical practice, and biomedical research, and are particularly valuable in fields such as gastroenterology, public health, and epidemiology.
Each dataset in the DigestiveDataSets
package uses a
suffix
to denote the type of R object:
_df
: data frame
_tbl_df
: tibble
_ts
: time series
Below are selected example datasets included in the
DigestiveDataSets
package:
digestive_cancer_survival_df
: Digestive Cancer
Survival Times.
campylobacter_infections_ts
: Campylobacter
Infections Time Series.
cholera_deaths_1849_tbl_df
: Cholera Daily Deaths in
England, 1849.
# Minimal data processing WITHOUT tidyr
digestive_cancer_survival_df %>%
summarise(
Stomach = sum(stomach, na.rm = TRUE),
Colon = sum(colon, na.rm = TRUE)
) %>%
# Convert to plot-ready format WITHOUT tidyr
{data.frame(
Cancer = names(.),
Cases = unlist(., use.names = FALSE)
)} %>%
# Plot
ggplot(aes(x = Cancer, y = Cases)) +
geom_col(fill = c("#e63946", "#1d3557")) +
labs(title = "Stomach vs Colon Cancer Cases") +
theme_minimal()
# Convert ts to numeric vector and numeric time
campy_df <- data.frame(
infections = as.numeric(campylobacter_infections_ts),
time = as.numeric(time(campylobacter_infections_ts))
)
# Plot without warning by using numeric 'time'
ggplot(campy_df, aes(x = time, y = infections)) +
geom_line(color = "steelblue") +
geom_point(color = "steelblue") +
labs(
title = "Campylobacter Infections Over Time",
x = "Time (year.fraction)",
y = "Number of Infections"
) +
theme_minimal()
The DigestiveDataSets
package offers a comprehensive,
well-curated collection of datasets focused on the digestive system and
related diseases. By including clinical trials, observational studies,
cohort data, and experimental datasets covering a broad spectrum of
gastrointestinal conditions, this package supports a wide range of
applications in research, education, and clinical practice.
For detailed information and full documentation of each dataset, please refer to the reference manual and help files included within the package.
These binaries (installable software) and packages are in development.
They may not be fully stable and should be used with caution. We make no claims about them.