R에서 약한 평활화를 수행하는 방법(단계별)

통계에서 lowess 라는 용어는 “국부적으로 가중치가 부여된 포인트 클라우드의 평활화”를 의미합니다. 이는 포인트 클라우드의 데이터 포인트에 해당하는 부드러운 곡선을 생성하는 프로세스입니다.

R에서 lowess 평활화를 수행하려면 다음 구문을 사용하는 lowess() 함수를 사용할 수 있습니다.

낮은 (x, y, f = 2/3)

금:

• x: x 값의 수치 벡터입니다.
• y: y 값의 수치 벡터입니다.
• f: 가장 부드러운 범위에 대한 값입니다. 이는 각 값의 평활화에 영향을 미치는 플롯의 점 비율을 제공합니다. 값이 높을수록 매끄러움이 더 커집니다.

다음 단계별 예는 R에서 주어진 데이터세트에 대해 약한 평활화를 수행하는 방법을 보여줍니다.

1단계: 데이터 생성

먼저 가짜 데이터세트를 만들어 보겠습니다.

 df <- data. frame (x=c(1, 1, 2, 2, 3, 4, 6, 6, 7, 8, 10, 11, 11, 12, 13, 14),
y=c(4, 7, 9, 10, 14, 15, 19, 16, 17, 21, 22, 34, 44, 40, 43, 45))

2단계: 데이터 도표화

다음으로 데이터 세트의 x 및 y 값을 플롯해 보겠습니다.

 plot(df$x, df$y) 

3단계: 최소 곡선 그리기

다음으로 산점도의 점에 가장 약한 평활 곡선을 그려 보겠습니다.

 #create scatterplot
plot(df$x, df$y)

#add lowess smoothing curve to plot
lines(lowess(df$x, df$y), col=' red ')

4단계: 더 부드러운 도달 범위 조정(선택 사항)

lowess() 함수의 f 인수를 조정하여 더 부드러운 범위에 사용되는 값을 늘리거나 줄일 수도 있습니다.

우리가 제공하는 값이 클수록 아래쪽 곡선이 더 부드러워집니다.

 #create scatterplot
plot(df$x, df$y)

#add lowess smoothing curves
lines(lowess(df$x, df$y), col=' red ')
lines(lowess(df$x, df$y, f=0.3), col=' purple ')
lines(lowess(df$x, df$y, f=3), col=' steelblue ')

#add legend to plot
legend(' topleft ',
       col = c(' red ', ' purple ', ' steelblue '),
       lwd = 2,
       c(' Smoother = 1 ', ' Smoother = 0.3 ', ' Smoother = 3 ')) 

추가 리소스

R의 그래프에 여러 선을 그리는 방법
R에서 회귀선을 사용하여 산점도를 만드는 방법
R에서 다항식 회귀를 수행하는 방법