knitr::opts_chunk$set( collapse = TRUE, comment = "#>" ) knitr::opts_knit$set(root.dir = here::here())
library(pandan) library(targets) library(gt) library(tidyverse)
A Gantt chart of my current progress with current projects with the features:
tar_glimpse()
# dev dataset tar_load(obs_proj) obs_proj %>% gt()
Based on these data, when should the start and end points be?
Component a_1
is not dependent on anything, and it is a top-level project, so its start and end times should span at its instantiated endpoint.
obs_proj %>% filter(component == "a_1") %>% select(project, start_inst, end_inst) %>% gt()
Component a_1.1
is dependent on a_1.2.1
. So, the start point needs to be endpoint of a_1.2.1
.
obs_proj %>% filter(component == "a_1.1") %>% pull(pred)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.