plot_ly(x = data[,1],
y = data[,2],
mode = 'lines'
)%>%
layout(
font = list(family = "Times New Roman", size = 14, color = "#000"),
yaxis = list(title = "Название оси на русском языке")
)