[R] Metaplot Axis Annotation

[Uwe Ligges]

Ishwar Bridgelal wrote:
> Hello,
> 
> We are looking to adjust the font size of the axis annotation on the graph
> that results from use of the metaplot() function. Metaplot seems to respond
> to cex and cex.lab to change those graphical parameters, but it doesn't
> respond to cex.axis. Is there a way to work around this by creating a
> customized x-axis, and if so, how?


Set the axis' character expansion for the whole device using par() as in:

   par(cex.axis=2)
   metaplot(....)

And for you next post:
Please provide reproducible code and tell us which package you are 
talking about (here "rmeta", I guess).

Best,
Uwe Ligges




> Thanks for all your help. Syntax is below.
> 
> Best,
> 
> Dawn McDaniel
> Ishwar Bridgelal
> University of Southern California
> 
>> local({pkg <- select.list(sort(.packages(all.available = TRUE)))
> + if(nchar(pkg)) library(pkg, character.only=TRUE)})
> Loading required package: grid
>> m1=matrix(scan(file="C:/Users/Roymohan/Desktop/meta.txt"), ncol=4,
> byrow=TRUE)
> Read 208 items
>> oddsratio=m1[,2]
>> seinor=m1[,3]
>> inw=m1[,4]
>> c1=c("Cross-Drew (1974)", "Ahlstrom & Havighurst (1982)", "Litton & Marye
> (1981)", "Gold & Mattick (1974)", "Willman & Snortum (1982)", "Leiber &
> Mawhorr (1995)", "Hackler & Hagan (1974)", "Sadd, Kotkin, & Freidman
> (1983)", "New York State Division for Youth (1972)", "Spergel (2005)",
> "Bloom et al. (1997)", "Quigley et al. (1999)", "Thambidurai (1980",
> "Schochet et al. (2001)", "Gruenewald, Laurence, & West (1985)", "Cave et
> al. (1993)", "Elliot & Knowles (1976)", "Elliot & Knowles (1976)", "Porter
> (1967)", "Kawaguchi (1975)", "Minnesota Governor’s Commission (1973)",
> "Youth Opportunities Upheld (1978)", "Maynard (1980)", "Baker & Sadd
> (1979)", "Goldberg & Johnson (1972)","Roth (1983)","Seckel & Turner
> (1967)","Zimring (1973)","Randall (1973)","Anderson & Schumacker
> (1986)","Lattimore, Witte, & Baker (1990)","Weisz, Walter, & Weiss
> (1990)","Greenwood & Turner (1993)","Johnson & Goldberg (1982)", "Kovacs
> (1967)","Auerbach (1978)","Guthmann (1981)","Sullivan & Mandall
> (1967)","Blew, McGillis, & Bryant (1970)"
> + , "Custer (1981)", "Goldberg (1978)", "Bowker (1977)", "Zivan (1966)",
> "Massimo & Shore (1966)", "Killinger (1974)", "Morris (1970)", "Bernardo
> (1973)", "Mann & Pratt (1978)", "Goodwill Industries Vocational Service
> (1971)", "Springfield Massachusetts Goodwill Industries, Inc. (1966)",
> "Walter & Mills (1980)", "Odell (1974)")
>> metaplot(mn=oddsratio, se=seinor, labels=c1, cex=.65, lwd=2, cex.lab=.65)
> 
> 	[[alternative HTML version deleted]]
> 
> 
> 
> ------------------------------------------------------------------------
> 
> ______________________________________________
> R-help at r-project.org mailing list
> https://stat.ethz.ch/mailman/listinfo/r-help
> PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
> and provide commented, minimal, self-contained, reproducible code.