# \donttest{
data(apt, package = "beezdemand")
# Calculate descriptive statistics
desc <- get_descriptive_summary(apt)
print(desc)
# View statistics table
desc$statistics
# Create visualization
plot(desc)
# Extended summary with distribution info
summary(desc)
# }
Run the code above in your browser using DataLab