Rd file 'EduDat.Rd':
  \examples lines wider than 100 characters:
     matplot(as.data.frame(ipop[,-1]),type="l",lwd=3,main=paste("Projected Population 15+ by Education Scenario, ",icountry,sep=""),cex.main ... [TRUNCATED]

Rd file 'Giza-package.Rd':
  \examples lines wider than 100 characters:
     iEduDat <- subset(EduDat,match(cc,getcode(Countries,dictionary)) & match(yr,Years) & match(scen2,Scenarios))
                                        factor(cc,levels=getcode(Countries,dictionary),labels=Countries) *
                type="l",lwd=1,xlab="Population",ylab="Age",main="Population by Highest Level of Education",
                scales=list(alternating=3,tick.number=5,relation="same",y=list(at=1:length(4:21),labels=agegrs)),
                                title="ED-Level",cex.title=1.1,lines.title=2.5,padding.text=1,background="white"),
     iEduDat <- subset(EduDat,match(cc,getcode(Countries,dictionary)) & match(yr,Years) & match(scen2,Scenarios))
                type="l",lwd=1,xlab="Population",ylab="Age",main=paste("Population by Highest Level of Education, ",Countries,sep=""),
                scales=list(alternating=3,tick.number=5,relation="same",y=list(at=1:length(4:21),labels=agegrs)),
                                title="ED-Level",cex.title=1.1,lines.title=2.5,padding.text=1,background="white"),

Rd file 'pyramid2.Rd':
  \examples lines wider than 100 characters:
     iEduDat <- subset(EduDat,match(cc,getcode(Countries,dictionary)) & match(yr,Years) & match(scen2,Scenarios))
                                        factor(cc,levels=getcode(Countries,dictionary),labels=Countries) *
                type="l",lwd=1,xlab="Population",ylab="Age",main="Population by Highest Level of Education",
                scales=list(alternating=3,tick.number=5,relation="same",y=list(at=1:length(4:21),labels=agegrs)),
                                title="ED-Level",cex.title=1.1,lines.title=2.5,padding.text=1,background="white"),
     iEduDat <- subset(EduDat,match(cc,getcode(Countries,dictionary)) & match(yr,Years) & match(scen2,Scenarios))
                type="l",lwd=1,xlab="Population",ylab="Age",main=paste("Population by Highest Level of Education, ",Countries,sep=""),
                scales=list(alternating=3,tick.number=5,relation="same",y=list(at=1:length(4:21),labels=agegrs)),
                                title="ED-Level",cex.title=1.1,lines.title=2.5,padding.text=1,background="white"),

Rd file 'pyramid2.formula.Rd':
  \examples lines wider than 100 characters:
     iEduDat <- subset(EduDat,match(cc,getcode(Countries,dictionary)) & match(yr,Years) & match(scen2,Scenarios))
                                        factor(cc,levels=getcode(Countries,dictionary),labels=Countries) *
                type="l",lwd=1,xlab="Population",ylab="Age",main="Population by Highest Level of Education",
                scales=list(alternating=3,tick.number=5,relation="same",y=list(at=1:length(4:21),labels=agegrs)),
                                title="ED-Level",cex.title=1.1,lines.title=2.5,padding.text=1,background="white"),
     iEduDat <- subset(EduDat,match(cc,getcode(Countries,dictionary)) & match(yr,Years) & match(scen2,Scenarios))
                type="l",lwd=1,xlab="Population",ylab="Age",main=paste("Population by Highest Level of Education, ",Countries,sep=""),
                scales=list(alternating=3,tick.number=5,relation="same",y=list(at=1:length(4:21),labels=agegrs)),
                                title="ED-Level",cex.title=1.1,lines.title=2.5,padding.text=1,background="white"),

Rd file 'pyramidlattice.Rd':
  \examples lines wider than 100 characters:
     iEduDat <- subset(EduDat,match(cc,getcode(Countries,dictionary)) & match(yr,Years) & match(scen2,Scenarios))
                                        factor(cc,levels=getcode(Countries,dictionary),labels=Countries) *
                type="l",lwd=1,xlab="Population",ylab="Age",main="Population by Highest Level of Education",
                scales=list(alternating=3,tick.number=5,relation="same",y=list(at=1:length(4:21),labels=agegrs)),
                                title="ED-Level",cex.title=1.1,lines.title=2.5,padding.text=1,background="white"),
     iEduDat <- subset(EduDat,match(cc,getcode(Countries,dictionary)) & match(yr,Years) & match(scen2,Scenarios))
                type="l",lwd=1,xlab="Population",ylab="Age",main=paste("Population by Highest Level of Education, ",Countries,sep=""),
                scales=list(alternating=3,tick.number=5,relation="same",y=list(at=1:length(4:21),labels=agegrs)),
                                title="ED-Level",cex.title=1.1,lines.title=2.5,padding.text=1,background="white"),

Rd file 'useOuterStrips2.Rd':
  \examples lines wider than 100 characters:
     iEduDat <- subset(EduDat,match(cc,getcode(Countries,dictionary)) & match(yr,Years) & match(scen2,Scenarios))
                                        factor(cc,levels=getcode(Countries,dictionary),labels=Countries) *
                type="l",lwd=1,xlab="Population",ylab="Age",main="Population by Highest Level of Education",
                scales=list(alternating=3,tick.number=5,relation="same",y=list(at=1:length(4:21),labels=agegrs)),
                                title="ED-Level",cex.title=1.1,lines.title=2.5,padding.text=1,background="white"),
     iEduDat <- subset(EduDat,match(cc,getcode(Countries,dictionary)) & match(yr,Years) & match(scen2,Scenarios))
                type="l",lwd=1,xlab="Population",ylab="Age",main=paste("Population by Highest Level of Education, ",Countries,sep=""),
                scales=list(alternating=3,tick.number=5,relation="same",y=list(at=1:length(4:21),labels=agegrs)),
                                title="ED-Level",cex.title=1.1,lines.title=2.5,padding.text=1,background="white"),

These lines will be truncated in the PDF manual.