knitr::opts_chunk$set(
  collapse = TRUE,
  comment = "#>"
)

knitr::opts_knit$set(root.dir = here::here())
library(pandan)
library(targets)
library(gt)
library(tidyverse)

Objective

A Gantt chart of my current progress with current projects with the features:

Development status

tar_glimpse()

Dependencies

# 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)


softloud/pandan documentation built on July 22, 2023, 6:45 p.m.