Tweak to penguins documentation

src/library/datasets/man/penguins.Rd

@@ -100,7 +100,7 @@ old_nms <- sub("len", "length_mm",
 ## compare old and current:
 noquote(rbind(old_nms, nms = colnames(penguins)))
 
-\dontrun{ # << not in this example, keeping our 'penguins' names:
+\dontrun{ # << not in this example, keeping shorter 'penguins' names:
     colnames(penguins) <- old_nms
 }
 \keyword{datasets}