tried to use RpostgreSQL, dbSendQuery + fetch