bug removeVirtualAreas param reassignCosts

[jalazawa]

It is OK

 myConDataFR<-removeVirtualAreas(
+   x=myDataFr,
+   storageFlexibility = getAreas(select = c("pum", "tur")),
+   production = getAreas(select = c("z_dsr", "y_mul")),
+   newCols = FALSE
+ )

It is KO

myConDataFR<-removeVirtualAreas(
+   x=myDataFr,
+   storageFlexibility = getAreas(select = c("pum", "tur")),
+   production = getAreas(select = c("z_dsr", "y_mul")),
+   newCols = FALSE, 
+   reassignCosts = TRUE
+ )
Error in area %in% areas : object 'area' not found
In addition: Warning messages:
1: In as.data.table.list(jval) :
  Item 1 is of size 0 but maximum size is 1, therefore recycled with 'NA'
2: In as.data.table.list(jval) :
  Item 2 is of size 0 but maximum size is 1, therefore recycled with 'NA'
3: In as.data.table.list(jval) :
  Item 3 is of size 0 but maximum size is 1, therefore recycled with 'NA'
4: In as.data.table.list(jval) :
  Item 1 is of size 0 but maximum size is 1, therefore recycled with 'NA'
5: In as.data.table.list(jval) :
  Item 2 is of size 0 but maximum size is 1, therefore recycled with 'NA'
6: In as.data.table.list(jval) :
  Item 3 is of size 0 but maximum size is 1, therefore recycled with 'NA'
Called from: area %in% areas

[jalazawa]

OK