hw08 ready for grading

[vmichalowski]

@vincenzocoia @gvdr @ksedivyhaley @JoeyBernhardt @mynamedaike @pgonzaleze @derekcho

Here's a link to me README.md file, in which you will find all the links you need to navigate my homework 8.

[yidie]

Hi @vmichalowski, here are some comments:

Data Cleaning

• I think you are very clear on what you are going to do with the dataset in order to achieve the functionality of your app.
• You mutated boy and girl data frame with a new variable sex, join them together, reshape the data and write cleaned data to file. Very well done!
• For coding sex to numbers, I think 0 and 1 would be better than 1 and 2 because it better captures the binary attribute of the variable sex.
• An alternative way to join the two data frame would be using dplyr join() functions.

Features of the APP

• Select the range of year as implemented by sliderInput().
• Select sex as implemented by radioButtons() .
• Select name as implemented by uiOutput() in order for it to be a dynamic input element.
• Plot and table are able to update according to users' selection.
• Plot and table are in separate tabs.
• Table is interactive.

Ideas for the unsuccessful features:

• For selecting multiple names, I think you should change server.R after changing ui.R. Because now the nameInput is a list instead of just one name, I suggest you change Name == input$NameInput to Name %in% input$NameInput in server.R. Try this and see if it works.
• For adding images, did you create the folder www? And maybe the height of the image should also be adjusted? Just some ideas for you to try.

Overall, good work! Everything is organized. README is very informative and the reflection is thorough. Good try with a new dataset as well.

Yidie

[mlawre01]

Hey @vmichalowski,

• Nice job tackling a new dataset and creating a new app (I also used a baby name dataset and had very ambitious plans)
• your README file was detailed and clearly outlined what you did for assignment
• your .md file was annotated and it was easy to follow along with your data wrangling to prepare the dataset for use in your app
• I like that you included data from the entire dataset
• I used a navbar layout instead of tabset and I didn’t have issues with the year range, but I’m not sure if this would solve the problem you had
• overall, great job making your own app and goodluck with the rest of your assignments!

[mylinhthibodeau]

Dear @vmichalowski,

Sorry for the late review, I have been sick with a cold recently and somehow, that one slipped through.

That being said, I applaud your effort to work with a new dataset, I think it's a great initiative !! In my personal opinion, I believe that you probably learned a lot more by trying something different and encountering some unexpected challenges, although it is not clearly measurable, that is a very rich learning experience !!

Peer Review

Good job, your app fulfill all the requirements:

1. Split into split into a ui.R and a server.R
2. Deployed online on shinyapps.io here
3. Has a README.md file which is informative and details your process.
4. Code of Shiny app included in your repository
5. Acknowledge the source of dataset clearly and extensively

You also explored these additional features:

• Used DT::dataTableOutput() to render a searchable table !
• Used tabsetPanel() to make two panels (plot and table)
• Used the radioButtons() for user input for sex, which is then used to filter the names available in the dropdown menu.

Additional useful tips

Your homework fulfill all the requirements, but I thought I should also provide some helpful comments and therefore, here are some little tips you might find helpful for your learning.

• You can use the following functions with loading the library in order to avoid error messages, for example:

  suppressMessages(suppressWarnings(library(shiny)))

• If you are working with the terminal in general, it is recommended to avoid white spaces in the names of folders and files, because it makes it tricky to write paths. You can substitute with "dash" or "underscore bar".
• The working directory of your homework should be by default C:/Users/Victoria/Desktop/STAT 545A/STAT545 Homework/STAT545-hw-Michalowski-Victoria and therefore, if you change working directory for the app folder, you should be able to get away with setwd("hw08 - building shiny apps/").
• You used both write_rds(baby_namesLong, "baby_namesLong.csv") and write_csv(baby_namesLong, "baby_namesLong.csv"), but only the latter option is the correct use. If you want to save an rds table to preserve reordering the factors (e.g. if you want to order the names according to the count instead of alphabetically), you would use write_rds(baby_namesLong, "baby_namesLong.rds")
• When splitting your Shiny App into a ui.R and a server.R, you don't have to put the ui <- and server <- portions, you can start directly with fluidPage( and function(input, output) { respectively.
• When acknowledging the source of the data, you might want to include a mention of the date you consulted the data, and if you want, you can use tags to insert a hyperlink directly in the app, for example, in your ui.R, you could add something like:

  tags$p("Data Source: Ministry of Health - British Columbia Vital Statistics Agency, most popular names over the past 100 years for:",
  tags$a("boys", href = "https://catalogue.data.gov.bc.ca/dataset/most-popular-boys-names-for-the-past-100-years"),  "and for" , tags$a("girls", href = "https://catalogue.data.gov.bc.ca/dataset/most-popular-girl-names-for-the-past-100-years"))

• A suggestion could be to make a data folder inside your Shiny App ui/server folder, that way, you don't have to download the data and you can use read_csv() or read.table()
• Regarding your question on adding an image: Did you ensure to place the image in a www folder inside your Shiny App folder? If you did complete that step, did you ensure that the code (img(src = "myimage.jgp", width = "100%")) was inside the ui.R and not the server.R file?
• I am sorry I can't help you with your question about multiple input, I also tried this and did not succeed. Therefore, if you find the answer, don't hesitate to let me know :)

Good job on this homework and I wish you good luck with the rest of the course !!

Warm regards,

My Linh Thibodeau

When everything is going great: on top of things, I made a mistake on the person I was suppose to review, but oh well, since it's already there, I thought I should leave this here in case you find it useful ;)