Hi Jeff,

One way to graph the differences between the two years for the first set of
data is via barchart(), a function equivalent to barplot in the lattice
package.

Please check if with this portion of code (and with your data) the graph you
get is quite self-explanatory.

###################################
require(lattice)

Lines<-"Parasite Year Infected
Leukocytozoon 2009 0.2564
Plasmodium 2009 0.3846
Hemoproteus 2009 0.0769
Leukocytozoon 2010 0.0562
Plasmodium 2010 0.7079
Hemoproteus 2010 0.3034
Any 2009 0.5128
Any 2010 0.7753
"
DF <- read.table(textConnection(Lines),  skip=1, as.is = TRUE,
       col.names=c("Parasite", "Year", "Infected")
      )


barchart(
         Infected ~ Parasite, data=DF,
         groups=as.factor(Year),
         auto.key = list(space = "bottom"),
         origin=0
         )

##############################

Regards,
Carlos Ortega
www.qualityexcellence.es


On Wed, Jul 20, 2011 at 5:56 AM, Stratford, Jeffrey <
jeffrey.stratford@wilkes.edu> wrote:

> Hi everyone,
>
>
>
> I determined the presence of three types parasites in a passerine bird
> over two years. I would like to create a bar chart that shows the
> proportion infected on the y and year/parasite on the x such that each
> type of parasite is grouped together (single label) and a bar for each
> year .  This would show if there have been changes in the prevalence of
> a the parasite over two years.
>
>
>
> This is the summary data:
>
>
>
> Parasite                Year       Infected
>
> Leukocytozoon 2009       0.2564
>
> Plasmodium       2009       0.3846
>
> Hemoproteus    2009       0.0769
>
> Leukocytozoon 2010       0.0562
>
> Plasmodium       2010       0.7079
>
> Hemoproteus    2010       0.3034
>
> Any                        2009       0.5128
>
> Any                        2010       0.7753
>
>
>
> Here are rows 86 to 92.  Band and site were recorded differently each
> year but these are not part of any calculation.
>
>
>
>   Year       band     site Plasmodium Hemoproteus Leukocytozoon Any
>
> 86 2010 2341-06597     1041          1           1             1   1
>
> 87 2010 2341-06598     1041          0           0             0   0
>
> 88 2010 2341-06599     1042          1           1             0   1
>
> 89 2010 2341-06600     1042          0           1             0   1
>
> 90 2009       6443 SOSP0901          0           0             1   1
>
> 91 2009       6444 SOSP0902          0           1             0   1
>
> 92 2009       6445 SOSP0903          0           0             0   0
>
>
>
> Any suggestions on how to create this plot would be greatly appreciated.
>
>
>
>
> Many thanks,
>
>
>
> Jeff
>
>
>
>
>
> *****************************************
>
> Jeffrey A. Stratford, Ph.D.
>
> Department of Health and Biological Sciences
>
> 84 W. South St.
>
> Wilkes Univertsity, PA 18766
>
> 570-332-2942
>
> http://web.wilkes.edu/jeffrey.stratford/
>
> *****************************************
>
>
>
>
>        [[alternative HTML version deleted]]
>
> ______________________________________________
> R-help@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.
>

	[[alternative HTML version deleted]]

