You can use the following R code.
MatrixGD <- read.csv(file = "symbol_in_name.csv",
header = TRUE, sep = ",", check.names = FALSE)
MatrixGD
colnames(MatrixGD) <- gsub("[?]","",colnames(MatrixGD))
MatrixGD
MatrixGD$`!1XSMTW25415`
output
> MatrixGD
?!1XSMTW25415 ?!1XSMTW25416
1 !12abc1 1 2
2 !12abc2 3 4
3 !12abc3 5 6
> colnames(MatrixGD) <- gsub("[?]","",colnames(MatrixGD))
> MatrixGD
!1XSMTW25415 !1XSMTW25416
1 !12abc1 1 2
2 !12abc2 3 4
3 !12abc3 5 6
>
> MatrixGD$`!1XSMTW25415`
[1] 1 3 5