r - 以编程方式将字符串宽度值插入 sprintf()

Question

我正在尝试以编程方式将字符串宽度值插入 sprintf()格式。

想要的结果是

sprintf("%-20s", "hello")
# [1] "hello               "

但我想插入 20即时，在同一个调用中，因此它可以是任何号码。我试过了

sprintf("%%-%ds", 20, "hello")
# [1] "%-20s"
sprintf("%-%ds", 20, "hello")
# Error in sprintf("%-%ds", 20, "hello") : 
#   invalid format '%-%d'; use format %f, %e, %g or %a for numeric objects
sprintf("%-%%ds", 20, "hello")
# Error in sprintf("%-%%ds", 20, "hello") : 
#   invalid format '%-%%d'; use format %f, %e, %g or %a for numeric objects

这在 sprintf() 中是否可行？ ?

Answer 1

是的，这可以通过使用星号 * 来实现.

如前所述 in the docs ,

A field width or precision (but not both) may be indicated by an asterisk *: in this case an argument specifies the desired number

因此代码将是

> sprintf("%-*s", 20, "hello")
[1] "hello               "