r语言赋值为na_r语言将空白格替换成NA

有数据集类似

user_id                                                      qid137

1 000013046dc0ab29ef8773eb61aba623                                0

2 0000cfcadfa43ef824669405081165b1

3 0006ee1acc5321260ba0fbff1fb8f649

4 00083f7b8c6170a3fc976d7b99245259                              227

5 0008b30fba90c724bbc1d57a1cc983de                               98

6 0008c5c05149bf5196f038a8fd1b550d      698d51a19d8a121ce581499d7b701668

数据中有大量空白格和脱密处理，希望将变量中的空白格和user_id  以外变量中的字符(98d51a19d8a121ce581499d7b701668)

变成缺失值：

也就是变成

user_id                                                      qid137

1 000013046dc0ab29ef8773eb61aba623                                0

2 0000cfcadfa43ef824669405081165b1                                NA

3 0006ee1acc5321260ba0fbff1fb8f649                                  NA

4 00083f7b8c6170a3fc976d7b99245259                              227

5 0008b30fba90c724bbc1d57a1cc983de                               98

6 0008c5c05149bf5196f038a8fd1b550d                                NA

用啦gsub，可是它变成为字符串啊。