getwd()
[1] "C:/Users/Alish Chelackal/Documents"
setwd("C:/Users/Alish Chelackal/Desktop/data base/project/task3")
library(RSQLite)
database <- dbConnect(SQLite(), dbname='TheLabDB')
dbDisconnect(database)
database <- dbConnect(SQLite(), dbname='TheLabDB')
statement <- "SELECT * FROM benches;"
result <- dbSendQuery(database,statement)
Ошибка: нет такой таблицы: скамейки
rows <- dbFetch(result, n=10)
Ошибка в dbFetch (result, n = 10): объект 'result' не найден