I have a df where columns 2 and beyond are dollar amounts such as $1004.23, ($1482.40), $2423.94 etc. Similar to the example below:
> df id desc price
for(i in 1:nrow(df)){ df[i,3] <- as.character(sub(")", "", sub("(", "-", as.character(df[i,3]), fixed=TRUE), fixed=TRUE)) df[i,3] <- as.numeric(gsub('[$,]', '', df[i,3])) }