Сгладить кривую и получить ее уравнение в R - PullRequest
1 голос
/ 02 апреля 2020

У меня есть этот код в R:

 plot(p,vec, pch = 4, xlab= "Values of x",ylab= "f(x)" )
  lines(p,vec)
  return (vec)

И у меня есть этот график:

Plot obtained

Я хотел бы сгладить кривую и получить ее уравнение в R, не могли бы вы помочь мне, пожалуйста?

1 Ответ

0 голосов
/ 02 апреля 2020

К сожалению, я не могу воспроизвести ваш пример, но я думаю, что это может быть хорошим решением:

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

...