This method exploits the available indexing relation_table<-tables. See also relation_table<-vectors.
<-