Đường kết nối các điểm trong hàm lô trong R

Question

Tôi có một vấn đề đơn giản trong hàm lô của ngôn ngữ lập trình R. Tôi muốn vẽ một đường giữa các điểm (see this link và how to plot in R), tuy nhiên, những gì tôi nhận được một cái gì đó kỳ lạ. Tôi muốn chỉ có một điểm được kết nối với một điểm khác, vì vậy mà tôi có thể nhìn thấy chức năng một cách liên tục, tuy nhiên, trong các điểm cốt truyện của tôi được kết nối ngẫu nhiên một số điểm khác. Xin vui lòng xem cốt truyện thứ hai.

Dưới đây là các mã:

x <- runif(100, -1,1) # inputs: uniformly distributed [-1,1] 
noise <- rnorm(length(x), 0, 0.2) # normally distributed noise (mean=0, sd=0.2) 
f_x <- 8*x^4 - 10*x^2 + x - 4 # f(x), signal without noise 
y <- f_x + noise # signal with noise 

# plots 
x11() 
# plot of noisy data (y) 
plot(x, y, xlim=range(x), ylim=range(y), xlab="x", ylab="y", 
    main = "observed noisy data", pch=16) 

x11() 
# plot of noiseless data (f_x) 
plot(x, f_x, xlim=range(x), ylim=range(f_x), xlab="x", ylab="y", 
    main = "noise-less data",pch=16) 
lines(x, f_x, xlim=range(x), ylim=range(f_x), pch=16) 

# NOTE: I have also tried this (type="l" is supposed to create lines between the points in the right order), but also not working: 
plot(x, f_x, xlim=range(x), ylim=range(f_x), xlab="x", ylab="y", 
    main = "noise-less data", pch=16, type="l") 

cốt truyện đầu tiên là đúng: Trong khi thứ hai là không phải những gì tôi muốn, tôi muốn có một cốt truyện liên tục:

Answer 1

Bạn phải sắp xếp các giá trị x:

plot(x, f_x, xlim=range(x), ylim=range(f_x), xlab="x", ylab="y", 
    main = "noise-less data",pch=16) 
lines(x[order(x)], f_x[order(x)], xlim=range(x), ylim=range(f_x), pch=16)