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.
Load libraries
Get data for the past approximately 13 months
Simple plot of RDS spend through time
rds_by_day <-
my_data %>%
filter(
id == "blended",
service == "Amazon Relational Database Service"
) %>%
mutate(date = as.Date(date))
ggplot(rds_by_day, aes(date, cost)) +
geom_col() +
scale_x_date(date_breaks = "10 days", date_labels = "%b %d") +
theme_grey(base_size = 16)
Plot of all types with cost greater than zero though time
all_by_day <-
my_data %>%
filter(id == "blended") %>%
group_by(service) %>%
filter(sum(cost) > 0) %>%
mutate(date = as.Date(date))
ggplot(all_by_day, aes(date, cost)) +
geom_col(aes(fill = acronym)) +
scale_x_date(date_breaks = "10 days", date_labels = "%b %d") +
theme_grey(base_size = 16)
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.