RosettaCodeData/Task/McNuggets-problem/R/mcnuggets-problem-4.r

3 lines
153 B
R
Raw Permalink Normal View History

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