RosettaCodeData/Task/McNuggets-problem/R/mcnuggets-problem-4.r
2023-07-01 13:44:08 -04:00

2 lines
153 B
R

results <- setdiff(0:100, mcNuggets)
cat("The non-McNuggets numbers that are no greater than 100 are:", results, "\nThe largest is", max(results), "\n")