У меня есть этот код в R:
plot(p,vec, pch = 4, xlab= "Values of x",ylab= "f(x)" ) lines(p,vec) return (vec)
И у меня есть этот график:
Я хотел бы сгладить кривую и получить ее уравнение в R, не могли бы вы помочь мне, пожалуйста?
К сожалению, я не могу воспроизвести ваш пример, но я думаю, что это может быть хорошим решением:
library(ggplot2) data_to_plot <- data.frame(p, vec) p <- ggplot(data_to_plot, aes(x=p, y=vec)) + geom_point(pch=4) + geom_smooth(colour='black') # Only plot print(p) # Dataset using for plotting ggplot_build(p) # Loess model as used in plot loessMod <- loess(vec ~ p, data=data_to_plot)
Проверьте шпаргалку ggplot для получения дополнительной информации о том, как вы можете сделать его хорошим графиком: https://rstudio.com/wp-content/uploads/2015/03/ggplot2-cheatsheet.pdf
Подробнее об использовании гладкой кривой см .: http://r-statistics.co/Loess-Regression-With-R.html