Background

• Motivation: Why bananas?
  • Agriculture Canada. Statistical overview of the Canadian fruit industry, 2022.
    • 21% share in 2022 (fruits after losses),
      
    • average <2 CAD per kg in 2023 (apples: >4.5 CAD per kg)
• About the data:
  • Source: Statistics Canada. Table 18-10-0245-02 Monthly average retail prices for selected products: Food.
    
  • Range: Monthly averages for Canada and 10 provinces (11 locales); Jan 2017 - Feb 2024.
• What the application does:
  • Users choose two year-month combinations to get two time points (t1 and t2).
  • Updates vertical lines in price plots.
  • Summarises data and statistics for 11 locales in a table.
  • Link to application: https://j1924cle.shinyapps.io/ShinySubmit/
    • App may be disabled to avoid exceeding alloted server time.

Sample plot

Calculations for table

#process time points
y1 <- 2017; m1 <- 5
y2 <- 2020; m2 <- 8

#prices at time points for locales
pr1 <- t(byprov53[rn1, 6:8] )
pr2 <- t(byprov53[rn2, 6:8] )
#percent diff between time points
d12 <- round(((pr2 - pr1)/pr1) *100, 2)
#avg and %RSD over time period
avg <- round(apply(byprov53[rn1:rn2, 6:8], 2, mean), 2)
RSD <- round( (apply(byprov53[rn1:rn2, 6:8], 2, sd) / avg) * 100, 2)
#percent diff from national avg per time point
prCAN1 <- round( ( (pr1 - (byprov53[rn1, 6] ))/ (byprov53[rn1, 6]) ) *100, 2)
prCAN2 <- round( ( (pr2 - (byprov53[rn2, 6] ))/ (byprov53[rn2, 6]) ) *100, 2)

Table with sample data