Skip to content
Snippets Groups Projects
Commit aa9b29c7 authored by Christina Azodi's avatar Christina Azodi
Browse files

fix error exporting cut

parent 8e877450
No related branches found
No related tags found
No related merge requests found
......@@ -46,7 +46,6 @@ importFrom(dplyr,summarise)
importFrom(foreach,"%dopar%")
importFrom(foreach,foreach)
importFrom(future,availableCores)
importFrom(lubridate,cut)
importFrom(lubridate,ymd)
importFrom(stats,pweibull)
importFrom(stats,rbinom)
......
......@@ -327,7 +327,6 @@ plot_times <- function(sim) {
#'
#' @importFrom tidyr pivot_wider
#' @importFrom dplyr group_by
#' @importFrom lubridate cut
#' @importFrom dplyr summarise
#' @export
get_weekly_local <- function(sim,
......
......@@ -4,12 +4,12 @@
\alias{format_sims}
\title{Format seiqhrf objects into dataframe for ggplot}
\usage{
format_sims(x, time_lim, start_date)
format_sims(x, time_limit, start_date)
}
\arguments{
\item{x}{An seiqhrf object returned from function \code{\link{seiqhrf}}.}
\item{time_lim}{Number of steps (days) to plot.}
\item{time_limit}{Number of steps (days) to plot.}
\item{start_date}{Date for day 0. Default: ymd("2020-03-21"),}
}
......
......@@ -6,20 +6,12 @@
\usage{
get_weekly_local(
sim,
<<<<<<< HEAD
market.share = market.share,
icu_percent = icu_percent,
start_date = start_date,
show_start_date = show_start_date,
time_lim = time_lim,
time_limit = time_limit,
total_population = total_population
=======
market.share,
icu_percent,
start_date,
time_lim,
total_population
>>>>>>> a8c57298caf1bdc80ae8ae8f15fc65d70d4b2b86
)
}
\arguments{
......@@ -35,12 +27,10 @@ ICU among the ones that need hospitalization}
plot week numbers, if provided will plot the first day (Sunday) of the
week.}
<<<<<<< HEAD
\item{show_start_date}{First date to show in plots. Use ymd format. If FALSE,
shows from step 1. Default: FALSE}
=======
\item{time_lim}{Number of days to include. Default = 90.}
>>>>>>> a8c57298caf1bdc80ae8ae8f15fc65d70d4b2b86
\item{time_limit}{Number of days to include. Default = 90.}
\item{total_population}{True population size, needed only if simulation size
is smaller than the true population size due to computational cost
......
......@@ -7,7 +7,7 @@
\method{plot}{list}(
x,
comp_remove = "none",
time_lim = 90,
time_limit = 90,
ci = TRUE,
sep_compartments = FALSE,
trans = FALSE,
......@@ -23,7 +23,7 @@
\item{comp_remove}{Compartments to remove. Suggest c(s.num, r.num)}
\item{time_lim}{Number of steps (days) to plot.}
\item{time_limit}{Number of steps (days) to plot.}
\item{ci}{T/F to include 95\% confidence intervals in sirplus plot.}
......
......@@ -8,7 +8,7 @@
x,
method = NULL,
comp_remove = "none",
time_lim = 90,
time_limit = 90,
ci = TRUE,
sep_compartments = FALSE,
trans = FALSE,
......@@ -33,7 +33,7 @@ If NULL, plot sirplus plots.}
\item{comp_remove}{Compartments to remove. Suggest c(s.num, r.num)}
\item{time_lim}{Number of steps (days) to plot.}
\item{time_limit}{Number of steps (days) to plot.}
\item{ci}{T/F to include 95\% confidence intervals in sirplus plot.}
......
......@@ -7,7 +7,7 @@
plot_sirplus(
x,
comp_remove,
time_lim,
time_limit,
ci,
sep_compartments,
trans,
......@@ -24,7 +24,7 @@ from \code{\link{seiqhrf}}.}
\item{comp_remove}{Compartments to remove. Suggest c(s.num, r.num)}
\item{time_lim}{Number of steps (days) to plot.}
\item{time_limit}{Number of steps (days) to plot.}
\item{ci}{T/F to include 95\% confidence intervals in sirplus plot.}
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment