An embedded and charset-unspecified text was scrubbed... Name: not available URL: <https://stat.ethz.ch/pipermail/r-help/attachments/20091121/4409e7e2/attachment-0001.pl>
Metaplot Axis Annotation
2 messages · Ishwar Bridgelal, 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.