Pad z zerami wiodącymi do wspólnej szerokości [duplikat]

To pytanie ma już tutaj odpowiedź:

Jak dodać wiodące zera? 8 odpowiedzi

Obsługuję DB w formacie godzinowym, np .:

HOUR ID
1  2
10 4
5  6
20 6

Chciałbym umieścić zero w wartości z 1 znakiem i zapisać je w nowej kolumnie o nazwie NHOUR, na przykład:

NHOUR HOUR ID
01 1  2
10 10 4
05 5 6
20 20 6

Do tej pory zmagam się z czymś podobnym (śledzę pewne sugestie już dostarczone na ifelse na forum):

DB$NHOUR<-with(DB,ifelse(nchar(HOUR,type="chars")==1),sprintf("%02d",HOUR),as.numeric(HOUR))

ale bez powodzenia! R zawsze zgłasza, że ​​element „tak” nie jest określony itd.

Jak zawsze, wszelkie wskazówki są mile widziane!

questionAnswers(4)

yourAnswerToTheQuestion