The "Day You Were Born" App

Yoav Pridor
12/7/2017

First Slide

Wouldn't you like to know…

Your parents always tell you stories about the day you were born
- How cute you were
- How much you weighed
- How crazy your grandparents were

but they never tell you what day of the week it was

Introducing The “Day You Were Born” App

Now you can know, with one click

Just open the app at

https://ypridor.shinyapps.io/Day_you_were_born/

Enter your date of birth in the side panel

Click the “What day was it” button

The app will calculate the day of the week

myDate <- "1978-09-25"
myDay <- weekdays(as.Date( myDate ))
print(c("You were born on a :",myDay))

[1] "You were born on a :" "Monday"