What will be the output of the following R code?

> f <- function(num) {
+ hello <- "Hello, world!\n"
+ for(i in seq_len(num)) {
+                    cat(hello)
+ }
+                    chars <- nchar(hello) *
 num
+
                    chars
+ }
> meaningoflife <- f(3)
> print(meaningoflife)