mtext - titles in r plots

¿Cómo hacer printf en r?

Question

Estoy buscando cómo hacer printf en r, es decir, quiero escribir:

printf("hello %d/n", 56 )

y obtener el mismo resultado que escribir:

print(sprintf("hello %d/n", 56 )

He leído los siguientes enlaces:

• Impresión de líneas nuevas con print () en R
• ¿Cuál es una forma más bonita de imprimir información con R?

... así que sé que podría usar cat("hello", 56) , y eso es probablemente lo que haré, pero me pregunto si hay alguna forma de acceso directo de escritura print(sprintf(...)) .

Lo siento si esta pregunta es un duplicado (no lo sé). Es terriblemente difícil buscar ''printf r'', ya que devuelve resultados para php, c, ...

Answer 1

Lo hago de esta manera:

printf = function(s, ...) cat(paste0(sprintf(s, ...)), ''/n'')

Answer 2

Mi solución:

> printf <- function(...) cat(sprintf(...))
> printf("hello %d/n", 56)
hello 56

Las respuestas dadas por Zack y mnel imprimen el símbolo de retorno de carro como un literal. No genial.

> printf <- function(...) invisible(print(sprintf(...)))
> printf("hello %d/n", 56)
[1] "hello 56/n"
>
> printf <- function(...)print(sprintf(...))
> printf("hello %d/n", 56)
[1] "hello 56/n"

Answer 3

Si desea una función que imprima (sprintf (...)), defina una función que lo haga.

printf <- function(...)print(sprintf(...))
printf("hello %d/n", 56)
## [1] "hello 56/n"
d <- printf("hello %d/n", 56)
## [1] "hello 56/n"
d
## [1] "hello 56/n"

Answer 4

printf <- function(...) invisible(print(sprintf(...)))

La llamada invisible externa puede ser innecesaria, no estoy 100% claro sobre cómo funciona.