R: update issue in sqldf

showing warning and not working after

library(sqldf)
credit <- read.csv("default of credit card clients.csv")
sqldf('UPDATE credit SET "MARRIAGE"=1 WHERE "MARRIAGE"=3')

data snapshot