R gsub и perl

Question

Привет Я пытаюсь определить конкретный образец соответствия.

Я хочу стоять. названия улиц.

y <- c("Straße des 18 JAN.") 

gsub("(.*)([1-3]?[0-9]\\.?)(JAN\\.?U?A?R?)(.*)","\\1 \\2 JANUAR \\4",y, perl=T) 

То, что я хочу, что он держит все, но переписывает кронштейн 3 к Januar, до сих пор я не мог справиться с этим.

Заранее спасибо.

Answer 1

Регулярное выражение должно быть

gsub("(.*)([1-3]?[0-9]\\.?) (JAN\\.?U?A?R?)(.*)","\\1\\2 JANUAR\\4",y, perl=TRUE) 

# [1] "Straße des 18 JANUAR" 

Я добавил пробельные () до срока, начиная с (JAN. Кроме того, я удалил пробелы между \\1 и \\2 и между JANUAR и \\4.