Although your dataset description leaves room for speculation, let us say you have the following structure:
dt = data.table(
location = c('M. Baldo', 'Foo', 'Bar', 'Hello', 'World')
)
> dt
location
1: M. Baldo
2: Foo
3: Bar
4: Hello
5: World
Say you want to create the column vQuote which takes the value 800 if location == 'M. Baldo' and 600 if location == 'Foo'. You can do the following using data.table:
locs = c('M. Baldo', 'Foo') #Which location values?
corrval = c(800, 600) #Which corresponding values in new column?
dt[, vQuote := sapply(location, function(x) corrval[which(locs == x)])]
> dt
location vQuote
1: M. Baldo 800
2: Foo 600
3: Bar
4: Hello
5: World
Obviously, vQuote is empty for rows [3:5] considering that they do not match any element in locs. You would have to specify your data structure more in depth. For instance, what value does vQuote take if no matches are in the set?