Here we present the amazing brand new app we just developed.

The app has the following incredibly amazing features:

• You can enter a number between 1 and 1000. Wow awesome!
• There is a Submit button that you can click and it does crazy stuff
• All the dividers of the number you entered are magically displayed

Here we show the amount of code it would have required to do the same process with R.

x <- 624
dividers <- which(round(x / 1:x) == x / 1:x)
textOutput <- paste(dividers, collapse = ", ")

And this is the results that is displayed if the number is 624:

1, 2, 3, 4, 6, 8, 12, 13, 16, 24, 26, 39, 48, 52, 78, 104, 156, 208, 312, 624

The end