Come utilizzare R sprintf per creare stringhe a larghezza fissa con spazi vuoti di riempimento alla FINE?

Question

Ho vettore di stringhe e voglio creare un fisso con una stringa fuori da quello. Le stringhe più corte devono essere riempite con spazi bianchi. Es .:

c("fjdlksa01dada","rau","sjklf") 
sprintf("%8s") 
# returns 
[1] "fjdlksa01dada" "  rau"  " sjklf" 

Ma come posso ottenere lo spazio bianco aggiuntivo alla FINE della stringa?

Nota che ho sentito di write.fwf dal pacchetto gdata che è veramente bello ma non aiuta molto in questo caso, perché ho bisogno di scrivere un formato non standard molto specifico per un vecchio programma obsoleto.

Answer 1

Aggiungere un segno meno davanti al 8 per ottenere una stringa imbottita allineato a sinistra

Answer 2

Questa è quasi più una "C" standard piuttosto che una domanda R in quanto riguarda le stringhe di formato printf. Si può anche provare questo su un prompt dei comandi:

edd@max:~$ printf "[% 8s]\n" foo 
[  foo] 
edd@max:~$ printf "[%-8s]\n" foo 
[foo  ] 
edd@max:~$ 

e in R funziona lo stesso per il padding sinistro:

R> vec <- c("fjdlksa01dada","rau","sjklf") 
R> sprintf("% 8s", vec) 
[1] "fjdlksa01dada" "  rau"  " sjklf"  
R> 

ea destra

R> sprintf("%-8s", vec) 
[1] "fjdlksa01dada" "rau  "  "sjklf "  
R> 

Edit: Aggiornato una volta ho capito meglio cosa realmente richiesto da @ ran2.

Answer 3

Il pacchetto stringr prevede str_pad:

library(stringr) 
x <- c("fjdlksa01dada","rau","sjklf") 
str_pad(x, width=8, side="right") 

che produce:

[1] "fjdlksa01dada" "rau  "  "sjklf "