USMortality

# Variables
APP_NAME="sftpgo"
DOMAIN="ftp.example.com"
EMAIL="your-email@example.com"
ENABLE_LETS_ENCRYPT=true  # Set to false to disable Let's Encrypt setup

# Create Dokku app
dokku apps:create $APP_NAME

# Set up domain

USMortality

library(readr)
library(dplyr)
library(tsibble)
library(TTR)
library(ggplot2)

# https://www-genesis.destatis.de/genesis/online?operation=table&code=12612-0002
df <- read_delim("https://apify.mortality.watch/genesis-12612-0002.csv",
  delim = ";",
  col_names = c("year", "month", "m", "f", "total"), skip = 6