library(readr)
t <- as.data.frame(read_csv("D:/Descargas/turkey_elec.csv",
          col_names = FALSE))

library(AnomalyDetection)
AnomalyDetectionVec(t, max_anoms=0.02, period=365, direction='both', only_last=FALSE, plot=TRUE)

$anoms
data frame with 0 columns and 0 rows

$plot
NULL