На этот вопрос уже есть ответ здесь:

Я работаю с БД с часовым форматом:

HOUR ID
1  2
10 4
5  6
20 6

Я хотел бы поместить ноль в значение с 1 символом и сохранить их в новом столбце с именем NHOUR, например:

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

До сих пор я борюсь с чем-то вроде (я следую некоторым предложениям, уже предоставленным для ifelse на форуме):

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

но безуспешно! R всегда сообщает, что «да» элемент не указан и т. Д.

Как всегда, любые советы приветствуются!