Можно ли добавить или сохранить один или несколько ведущих нулей в число без преобразования результата в символ? Каждое решение, которое я нашел для добавления начальных нулей, возвращает строку символов, включая: paste
, formatC
, format
и sprintf
.Добавление или сохранение ведущих нулей без преобразования в формат символов
Например, может быть x
0123
или 00123
и т.д., вместо того, чтобы 123
и все еще быть числовым?
x <-
EDIT
Это не важно. Я просто играл со следующим кодом, и последние две строки дали неверный ответ. Я просто подумал, может быть, если бы у меня были ведущие нули с числовым форматом, получение правильного ответа было бы проще.
a7 = c(1,1,1,0); b7=c(0,1,1,1); # 4
a77 = '1110' ; b77='0111' ; # 4
a777 = 1110 ; b777=0111 ; # 4
length(b7[(b7 %in% intersect(a7,b7))])
R - count matches between characters of one string and another, no replacement
keyword <- unlist(strsplit(a77, ''))
text <- unlist(strsplit(b77, ''))
sum(!is.na(pmatch(keyword, text)))
ab7 <- read.fwf(file = textConnection(as.character(rbind(a777, b777))), widths = c(1,1,1,1), colClasses = rep("character", 2))
length(ab7[2,][(ab7[2,] %in% intersect(ab7[1,],ab7[2,]))])
В каком смысле это может измениться? Я имею в виду, * почему * он должен быть числовым и быть '0123'? –