How to rotate Stata -by- group graph horizontally

[Madu Abuchi]

Hi Statalist members,

I was wondering if there's a way to replicate this R gglot graph in Stata in terms of making the -by- variable display in a horizontal fashion instead of vertical.

R ggplot here:

Example using Stata shows the -by- group in vertical:

webuse auto, clear
recode rep78 (1/3 = 0 "M") (4/5 = 1 "F"), gen(gender)
scatter weight length , by(gender) || lfitci weight length , by(gender, legend(off) note(" ")) col(%50) scheme(s1color) ylab(, grid) xlab(, grid) xsize(3)

Stata scatter graph here:

How do I rotate the Stata graph to look like the R ggplot graph above?

Thanks

[William Lisowski]

As you scroll through the options in the output of help scatter you'll see twoway_options. Click on that and you'll find that the following will do what you want.

scatter weight length , by(gender, col(1)) || lfitci weight length , by(gender, legend(off) note(" ")) col(%50) scheme(s1color) ylab(, grid) xlab(, grid) xsize(3)

[Madu Abuchi]

As you scroll through the options in the output of help scatter you'll see twoway_options. Click on that and you'll find that the following will do what you want.

scatter weight length , by(gender, col(1)) || lfitci weight length , by(gender, legend(off) note(" ")) col(%50) scheme(s1color) ylab(, grid) xlab(, grid) xsize(3)

Thanks William for your response. Is there any way the rectangular box that houses the "M" and "F" groups can be switched to the right hand side of the y-axis as shown in the R ggplot2 example above?

[Nick Cox]

sysuse auto, clear 
recode rep78 (1/3 = 0 "M") (4/5 = 1 "F"), gen(gender)
scatter weight length , by(gender, col(1)) subtitle(, pos(3) nobox nobexpand) || lfitci weight length , by(gender, legend(off) note(" ")) col(%50) scheme(s1color) ylab(, grid) xlab(, grid) xsize(3)

[Madu Abuchi]

sysuse auto, clear
recode rep78 (1/3 = 0 "M") (4/5 = 1 "F"), gen(gender)
scatter weight length , by(gender, col(1)) subtitle(, pos(3) nobox nobexpand) || lfitci weight length , by(gender, legend(off) note(" ")) col(%50) scheme(s1color) ylab(, grid) xlab(, grid) xsize(3)

Thanks Nick