Jak utworzyć legendę poziomą w bazie r (2 metody)

Aby utworzyć legendę poziomą na podstawowym wykresie R, można użyć następujących metod:

Metoda 1: Użyj argumentu poziomego

 legend(' bottom ', fill=fill_cols, legend=c(' A ', ' B ', ' C ', ' D ', ' E ', ' F '),
        horiz= TRUE , inset=c(0, -.1), xpd= TRUE )

W tym konkretnym przykładzie pod wykresem tworzona jest pozioma legenda, w której każdy element legendy znajduje się w tej samej linii.

Metoda 2: Użyj argumentu ncol

 legend(' bottom ', fill=fill_cols, legend=c(' A ', ' B ', ' C ', ' D ', ' E ', ' F '),
        ncol=3, inset=c(0, -.15), xpd= TRUE )

W tym konkretnym przykładzie tworzona jest pozioma legenda pod wykresem z trzema kolumnami.

Argument inset(x, y) kontroluje położenie legendy. Używając wartości ujemnych dla wartości y, możemy wypchnąć legendę poza wykres.

Argument xpd=TRUE pozwala nam umieścić legendę poza wykresem, pozostając jednocześnie widoczną na obszarze wykresu.

Poniższe przykłady pokazują, jak zastosować każdą metodę w praktyce.

Przykład 1: użyj argumentu horiz, aby utworzyć legendę poziomą o podstawie R

Poniższy kod pokazuje, jak użyć argumentu horiz=TRUE w funkcji legend() , aby utworzyć legendę poziomą na dole podstawowego wykresu R:

 #create vector of values
data <- c(4, 10, 7, 5, 4, 3)

#specify fill colors to use
fill_cols <- c(' red ', ' pink ', ' blue ', ' green ', ' purple ', ' brown ')

#create bar plot to visualize values in vector
barplot(data, col=fill_cols)

#add legend to bottom of plot
legend(' bottom ', fill=fill_cols, legend=c(' A ', ' B ', ' C ', ' D ', ' E ', ' F '),
        horiz= TRUE , inset=c(0, -.1), xpd= TRUE ) 

Należy pamiętać, że utworzono legendę poziomą, która została umieszczona na dole wykresu.

Możesz swobodnie bawić się wartościami wstawianego argumentu, aby dostosować również położenie legendy.

Na przykład możemy uczynić wartość y wstawianego argumentu jeszcze bardziej ujemną, aby jeszcze bardziej obniżyć legendę:

 #create vector of values
data <- c(4, 10, 7, 5, 4, 3)

#specify fill colors to use
fill_cols <- c(' red ', ' pink ', ' blue ', ' green ', ' purple ', ' brown ')

#create bar plot to visualize values in vector
barplot(data, col=fill_cols)

#add legend to bottom of plot
legend(' bottom ', fill=fill_cols, legend=c(' A ', ' B ', ' C ', ' D ', ' E ', ' F '),
        horiz= TRUE , inset=c(0, -.2), xpd= TRUE ) 

Należy zwrócić uwagę, że legenda pozioma została przesunięta jeszcze niżej poniżej wykresu.

Przykład 2: użyj argumentu ncol, aby utworzyć legendę poziomą o podstawie R

Poniższy kod pokazuje, jak używać argumentu ncol w funkcji legend() do tworzenia poziomej legendy z trzema kolumnami na dole podstawowego wykresu R:

 #create vector of values
data <- c(4, 10, 7, 5, 4, 3)

#specify fill colors to use
fill_cols <- c(' red ', ' pink ', ' blue ', ' green ', ' purple ', ' brown ')

#create bar plot to visualize values in vector
barplot(data, col=fill_cols)

#add legend to bottom of plot
legend(' bottom ', fill=fill_cols, legend=c(' A ', ' B ', ' C ', ' D ', ' E ', ' F '),
        ncol=3, inset=c(0, -.15), xpd= TRUE ) 

Należy pamiętać, że utworzono trzykolumnową legendę poziomą, która została umieszczona na dole wykresu.

Możesz dowolnie modyfikować wartość argumentu ncol , aby utworzyć legendę z inną liczbą kolumn.

Dodatkowe zasoby

Poniższe samouczki wyjaśniają, jak wykonywać inne typowe zadania w języku R:

Jak zmienić rozmiar legendy na wykresie Base R
Jak narysować legendę poza fabułą w R
Jak zmienić położenie legendy na podstawowych wykresach R