Weźmy ten przykład:Jak połączyć kropki tam, gdzie brakuje wartości?
test=c(1,5,NA,5,4,1,NA,3,3,5,4,2)
plot(test,type="l")
Będzie poletka doświadczalnego, ale nie będzie podłączyć dots.Is istnieje sposób możemy ignorować NAS i połączyć kropki tak otrzymujemy ładny wykres?
nie ma sposobu, aby zignorować brakujących wartości. Musisz zastąpić je wartościami interpolowanymi.
# using base packages only
plot(approx(test, xout=seq_along(test))$y, type="l")
# or, using zoo
library(zoo)
plot(na.approx(test), type="l")
Jeden opcje to:
plot(na.omit(test), type = "l")
Jeśli chcesz zachować oś x począwszy od 1 - length(test) wówczas:
plot(na.omit(cbind(x = seq_along(test), y = test)), type = "l")
Ale to usuwa brakujących wartości, a tym samym tworzy oś x z tylko 10 wartości zamiast 12. Założono, że OP chce utrzymać oś X z 12 wartościami. –
@JoshuaUlrich Zatem nie można polegać na R generującym dla ciebie zmienną x jako '1: length (x)'. Jednym z rozwiązań jest samodzielne utworzenie indeksu '1: length (x)' i powiązanie go z danymi, a następnie "na.omit()" tej macierzy. To powinno dawać taki sam wynik, jak twoja interpolacja, bez faktycznego interpolowania - nie ma takiej potrzeby, aby dać, że wszystko, co chcesz zrobić, to połączyć kropki; umieszczenie punktu, w którym są "NA", to oczywiście inna sprawa. –
+1 Bardzo ładne ... –
Innym sposobem, który zachowuje brakującą wartość w tych samych miejscach
data=data.frame(x=1:12,y=test)
plot(data)
lines(data)
lines(na.omit(data),col=2)
albo w ggplot2
ggplot(data,aes(x,y))+geom_point()+geom_line(data=na.omit(data))
Jest! A ty nie potrzebujesz interpolacji ... :-) Dziękuję za wzięcie udziału w konkursie - zredagowałem swoją odpowiedź na konto dla przewidywanego przypadku użycia. –