0
votes

Comment ajouter $ Sign aux étiquettes sur la carte à barres dans R? [Image et code inclus]

Vous cherchez à ajouter un signe de dollar sur les étiquettes de mon axe X et les chiffres de la carte à barres. Vous trouverez ci-dessous mon code et le graphique.

YTD_bar <- 
      ggplot(TYSales_LYSales, aes(x=as.character(FSCL_YR), y=SALES)) + geom_bar(stat="identity", fill="orange", color="grey40") + theme_bw() + coord_flip() + 
      geom_text(aes(x= as.character(FSCL_YR), y=0.01, label= SALES),
                hjust=-0.8, vjust=-1, size=3, 
                colour="black", fontface="bold",
                angle=360) + labs(title="D27 2020 YTD Sales v 2019 YTD Sales", x="Fiscal Year",y="Sales") + theme(plot.title=element_text(hjust=0.5))
    YTD_bar

r ggplot2

2 commentaires

Aidez-nous à vous aider: Fournir un exemple de reproductible minimal . En particulier, s'il vous plaît Modifier Votre message pour inclure la sortie de la commande R dput (tysales_lysales) (ou dput (tête (tysales_lysales)) si tysales_lysales est un grand Dataframe) afin que nous puissions facilement travailler avec vos données dans nos sessions R.


                                        
                                                                            bien sûr fera, c'est très petit



                                    
                    3 Réponses :
                    
                                            
                            
                                
                                    1
 votes
                                
                            
                            
                                
                                     Vous pouvez le faire avec une application libérale de  sprintf ("$% 0.2f", ...)  code>. La pièce % 0.2f  code> est de formater comme numéros de points flottants, mais avec deux décimales. Vous devez faire cela à deux endroits: (1) dans  geom_text ()  code>, et (2) dans le cadre d'un appel à  échelle_y_continu ()  code>: 
TYSales_LYSales <- data.frame(
    FSCL_YR = 2019:2020,
    SALES   = c(61851186, 5511072)
)

                                

                                                                    
                                    
                                    
                                        0 commentaires
                                        
                                                                                    
                                    
                                                            
                        
                        
                                            
                            
                                
                                    1
 votes
                                
                            
                            
                                
                                     Vous pouvez spécifier l'étiquette vous-même et ajouter un signe de dollar à l'avant en utilisant la fonction PASTE0 () 
df <- data.frame(yr = 2019:2020, sales = c(1234, 5678))
df$text <- paste0("$", df$sales)

ggplot(df, aes(x=as.character(yr), y=sales)) + 
  geom_col(fill="orange", color="grey40") + 
  theme_bw() + 
  coord_flip() + 
  geom_text(aes(x = as.character(yr), y=0.01, label= text),
            hjust=-0.8, vjust=-1, size=3, 
            colour="black", fontface="bold",
            angle=360) +
  scale_y_continuous(breaks = 0:3 * 2000,
                     labels = paste0("$", 0:3 * 2000))

                                

                                                                    
                                    
                                    
                                        0 commentaires
                                        
                                                                                    
                                    
                                                            
                        
                        
                                            
                            
                                
                                    1
 votes
                                
                            
                            
                                
                                     Le paquet d'échelles (installé avec ggplot2) a le dollar manuel  et  label_dollar ()  fonctions pour convertir les valeurs décimales en devise. 
 Voir l'aide pour comprendre le Mai options disponibles pour ajuster le formatage.   xxx  
                                     


                                                                    
                                    
                                    
                                        1 commentaires
                                        
                                                                                            
                                                    Merci beaucoup. Cela m'a fait pour moi et a appris quelque chose de nouveau en cours de route


            
                
		    
                    Articles qui pourrait vous intéresser :
                                            
                            Comment créer une barre de couleur dégradée discrète avec geom_contour_filled?                        
                        
                                            
                            Variable de bande dans R                        
                        
                                            
                            Mélanger le vecteur dans R, mais les éléments identiques doivent avoir une distance minimale                        
                        
                                            
                            Pour imprimer la valeur de l'année bissextile suivante en utilisant la variable dans la programmation R