3 ToastUI Schedule ?


##    calendarId        title                    body recurrenceRule
## 1           1        Sport  Go to sport every week     Every week
## 2           1        Sport  Go to sport every week     Every week
## 3           1        Sport  Go to sport every week     Every week
## 4           1     Week-end   Week-end with friends           <NA>
## 5           2    Project 1       Coding cool stuff           <NA>
## 6           2    Project 2       Coding cool stuff           <NA>
## 7           2    Project 3       Coding cool stuff           <NA>
## 8           3   Training 1       Learn programming           <NA>
## 9           3   Training 2       Learn programming           <NA>
## 10          2      Meeting Meeting with John Smith           <NA>
## 11          2        Lunch     Lunch with Jane Doe           <NA>
## 12          3   Conference       Cool R conference           <NA>
## 13          4 Mum birthday          Dont forget!!!           <NA>
##                  start                 end category          location
## 1  2024-12-05 20:00:00 2024-12-05 22:00:00     time              <NA>
## 2  2024-12-12 20:00:00 2024-12-12 22:00:00     time              <NA>
## 3  2024-12-19 20:00:00 2024-12-19 22:00:00     time              <NA>
## 4           2024-12-14          2024-12-15   allday              <NA>
## 5           2024-12-02          2024-12-03   allday              <NA>
## 6           2024-12-03          2024-12-06   allday              <NA>
## 7           2024-12-29          2024-12-29   allday              <NA>
## 8           2024-12-10          2024-12-13   allday              <NA>
## 9           2024-12-17          2024-12-19   allday              <NA>
## 10 2024-12-20 14:00:00 2024-12-20 17:00:00     time              <NA>
## 11 2024-12-24 12:00:00 2024-12-24 14:00:00     time   Some restaurant
## 12          2024-12-27          2024-12-28   allday Conference center
## 13          2024-12-03          2024-12-03   allday              <NA>
##    backgroundColor   color borderColor
## 1             <NA>    <NA>        <NA>
## 2             <NA>    <NA>        <NA>
## 3             <NA>    <NA>        <NA>
## 4             <NA>    <NA>        <NA>
## 5          #5E81AC   white     #5E81AC
## 6          #5E81AC   white     #5E81AC
## 7          #5E81AC   white     #5E81AC
## 8             <NA>    <NA>        <NA>
## 9             <NA>    <NA>        <NA>
## 10            <NA>    <NA>        <NA>
## 11            <NA>    <NA>        <NA>
## 12            <NA>    <NA>        <NA>
## 13         #FAFAFA #FF0000     #FF0000
##   calendarId    title                        body               start
## 1          3 Course 1 Learn something interesting  2024-12-02 8:00:00
## 2          3 Course 2 Learn something interesting 2024-12-02 14:00:00
## 3          3 Course 3 Learn something interesting 2024-12-04 08:00:00
## 4          3 Course 4 Learn something interesting 2024-12-05 16:00:00
## 5          2    Lunch                  Work lunch 2024-12-03 12:00:00
## 6          2  Meeting                Work meeting 2024-12-03 16:00:00
## 7          1    Sport          Make some exercise 2024-12-05 07:00:00
## 8          1    Movie       Go watch a cool movie 2024-12-04 18:00:00
## 9          1  Day off              Take some rest          2024-12-06
##                   end category
## 1 2024-12-02 12:00:00     time
## 2 2024-12-02 18:00:00     time
## 3 2024-12-04 11:00:00     time
## 4 2024-12-05 19:00:00     time
## 5 2024-12-03 14:00:00     time
## 6 2024-12-03 18:30:00     time
## 7 2024-12-05 09:00:00     time
## 8 2024-12-04 21:00:00     time
## 9          2024-12-06   allday
##   calendarID title   body               start                 end category
## 1          1     A  aaaaa  2024-10-14 8:00:00 2024-10-14 12:00:00     time
## 2          2     B   bbbb 2024-10-14 14:00:00 2024-10-14 18:00:00     time
## 3          3     C cccccc 2024-10-16 08:00:00 2024-10-16 11:00:00     time
## 4          2     D dddddd 2024-10-17 08:00:00 2024-10-17 19:00:00     time

library(toastui)
library(readxl)

my_data <- read_excel("sample_toastui_excel.xlsx", sheet = "Sheet1")

my_data
## # A tibble: 4 × 6
##   calendarID title body   start               end                 category
##        <dbl> <chr> <chr>  <dttm>              <dttm>              <chr>   
## 1          1 A     aaaaaa 2024-10-14 08:00:00 2024-10-14 12:00:00 time    
## 2          2 B     bbbbb  2024-10-14 14:00:00 2024-10-14 18:00:00 time    
## 3          3 C     ccccc  2024-10-16 08:00:00 2024-10-16 11:00:00 time    
## 4          2 D     ddddd  2024-10-17 08:00:00 2024-10-17 19:00:00 time
calendar(my_data, view = "week", height = 1000, defaultDate = "2024-10-18") %>% 
cal_week_options(
  startDayOfWeek = 1,
  workweek = TRUE
) %>% 
cal_props(cal_demo_props())