If always is the first character, you can try:
substring("\U00A6 1000-66B29", 2)
if R prints the string as 1000-66329 instead of ¦ 1000-66B29 then is interpreted as the string "" instead of the unicode character. Then you can do:
substring(" 1000-66329",9)
Both ways the result is:
[1] " 1000-66329"