Displaying 20 results from an estimated 21 matches for "biosecurity".
2003 Sep 17
2
CART analysis
Greetings,
Does anyone know of an R code for classification and regression tree
analysis (CART)?
Thank you
Ron
Ron Thornton BVSc, PhD, MACVSc (pathology, epidemiology)
Programme Co-ordinator, Active Surveillance
Animal Biosecurity
MAF Biosecurity Authority
P O Box 2526
Wellington, New Zealand
phone: 64-4-4744156
027 223 7582
fax: 64-4-474-4133
e-mail: ron.thornton at maf.govt.nz
http://www.maf.govt.nz
2011 May 03
2
Overlapping x axes using Lattice
...t,age)
histogram(~pesti[,1]|pesti[,2]+ pesti[,3]
,alternating=TRUE,tick.number=1,
stack=TRUE,type = "count", xlab="VNT",rot=c(180,180),draw=FALSE)
Thank you in advance.
Andy
Andrew McFadden MVS BVSc
Incursion Investigator
Investigation & Diagnostic Centres - Wallaceville Biosecurity New
Zealand Ministry of Agriculture and Forestry
Phone 04 894 5600 Fax 04 894 4973 Mobile 029 894 5611 Postal address:
Investigation and Diagnostic Centre- Wallaceville Box 40742 Ward St
Upper Hutt
This email message and any attachment(s) is intended solely for the addressee(s)
named above...
2008 Jun 06
3
R loop
...rmat = "%Y-%m-%d")
set
for(i in a$date){
if (a$date[i]>set & a$date[i]<set +7 ){a$wk<-1}else
if (a$date[i]>set +7){a$wk<-2}else {a$wk<-3}
}
a
Kind regards
andy
Andrew McFadden MVS BVSc
Incursion Investigator
Investigation & Diagnostic Centres - Wallaceville Biosecurity New
Zealand Ministry of Agriculture and Forestry
Phone 04 894 5600 Fax 04 894 4973 Mobile 029 894 5611 Postal address:
Investigation and Diagnostic Centre- Wallaceville Box 40742 Ward St
Upper Hutt
########################################################################
This email message and...
2008 May 06
3
Spatial join between two datasets using x and y co-ordinates
...pt
1 1824615 5980732 cat
2 1823650 5983220 dog
And therefore limit the data in dataset 1 to that which has the same x
and y co-ordinates as dataset 2.
Any suggestions?
Regards
Andy
Andrew McFadden MVS BVSc
Incursion Investigator
Investigation & Diagnostic Centres - Wallaceville Biosecurity New
Zealand Ministry of Agriculture and Forestry
Phone 04 894 5600 Fax 04 894 4973 Mobile 029 894 5611 Postal address:
Investigation and Diagnostic Centre- Wallaceville Box 40742 Ward St
Upper Hutt
########################################################################
This email message...
2009 Mar 17
3
Combining columns from two dataframes
...01"), format =
"%Y-%m-%d"),c(1:2))
names(b)=c("c","d")
a;b
I have tried:
append(a,b)
combine(a,b)
rbind(a,b)
I would appreciate your help.
Kind regards
andy
Andrew McFadden MVS BVSc
Incursion Investigator
Investigation & Diagnostic Centres - Wallaceville Biosecurity New
Zealand Ministry of Agriculture and Forestry
Phone 04 894 5600 Fax 04 894 4973 Mobile 029 894 5611 Postal address:
Investigation and Diagnostic Centre- Wallaceville Box 40742 Ward St
Upper Hutt
########################################################################
This email message and...
2009 Apr 01
4
Recode of text variables
...;)
recode(x, "1:2='A'; 3='B'")
In Microsoft access a simple way of recoding is to join two tables in a
query any simple way of doing the same in R?
Kind regards
Andy
Andrew McFadden MVS BVSc
Incursion Investigator
Investigation & Diagnostic Centres - Wallaceville Biosecurity New
Zealand Ministry of Agriculture and Forestry
Phone 04 894 5600 Fax 04 894 4973 Mobile 029 894 5611 Postal address:
Investigation and Diagnostic Centre- Wallaceville Box 40742 Ward St
Upper Hutt
########################################################################
This email message and...
2009 Apr 01
1
Adjusting font size in a lattice graph
...ld change the font size.
tp1.nDai=xyplot(value ~ yr | Name, data = nDai,type = 'o')
update(tp1.nDai, aspect = c(0.8), layout = c(4, 4))
I would appreciate your help.
Kind regards
andy
Andrew McFadden MVS BVSc
Incursion Investigator
Investigation & Diagnostic Centres - Wallaceville Biosecurity New
Zealand Ministry of Agriculture and Forestry
Phone 04 894 5600 Fax 04 894 4973 Mobile 029 894 5611 Postal address:
Investigation and Diagnostic Centre- Wallaceville Box 40742 Ward St
Upper Hutt
########################################################################
This email message and...
2023 Jan 31
1
[EXT] How to calculate the derivatives at each data point?
Try something like
with(df, predict(smooth.spline(x = altitude, y = atm_values), deriv = 1))
Cheers,
Andrew
--
Andrew Robinson
Chief Executive Officer, CEBRA and Professor of Biosecurity,
School/s of BioSciences and Mathematics & Statistics
University of Melbourne, VIC 3010 Australia
Tel: (+61) 0403 138 955
Email: apro at unimelb.edu.au
Website: https://researchers.ms.unimelb.edu.au/~apro at unimelb/
I acknowledge the Traditional Owners of the land I inhabit, and pay my respec...
2010 Feb 14
1
Adding a regression line to an xyplot
...eg.line=lm, smooth=FALSE, type=c("p","g"),xlab="a",ylab="b")
> I would appreciate your help.
>
> Kind regards
>
> andy
>
> Andrew McFadden MVS BVSc
> Incursion Investigator
> Investigation & Diagnostic Centres - Wallaceville Biosecurity New
> Zealand Ministry of Agriculture and Forestry
>
> Phone 04 894 5600 Fax 04 894 4973 Mobile 029 894 5611 Postal address:
> Investigation and Diagnostic Centre- Wallaceville Box 40742 Ward St
> Upper Hutt
>
#################################################################...
2009 Apr 14
2
Subset function: selecting variables within a factor
...elp for subset:
subset(airquality, Temp > 80 select = c(Ozone, Temp))
So how do I select all temperatures of 90 and 80 ie Temp = c(80,90)
I would appreciate your help.
Kind regards
andy
Andrew McFadden MVS BVSc
Incursion Investigator
Investigation & Diagnostic Centres - Wallaceville Biosecurity New
Zealand Ministry of Agriculture and Forestry
Phone 04 894 5600 Fax 04 894 4973 Mobile 029 894 5611 Postal address:
Investigation and Diagnostic Centre- Wallaceville Box 40742 Ward St
Upper Hutt
########################################################################
This email message and...
2011 May 17
1
Dealing with null values Aggregate function
...aggregate(x = testDF, by = list(testDF$v3), FUN = "mean")
For this example I would like to get a mean value for red (v1=4.5; v1=5)
and blue (v1=49.5; v2=55)
Thank you in advance.
Andy
Andrew McFadden MVS BVSc
Incursion Investigator
Investigation & Diagnostic Centres - Wallaceville Biosecurity New
Zealand Ministry of Agriculture and Forestry
Phone 04 894 5600 Fax 04 894 4973 Mobile 029 894 5611 Postal address:
Investigation and Diagnostic Centre- Wallaceville Box 40742 Ward St
Upper Hutt
This email message and any attachment(s) is intended solely for the addressee(s)
named above...
2008 May 11
1
Finding unmatched data between two dataframe using several factors
...(A6,zane, 50).
I have tried two approaches but have not been successful
? nomatch <- subset(dat1, is.element(?) == FALSE)
? setdiff(dat1$x,dat2$y)
Any thoughts would be great
Regards
Andy
Andrew McFadden MVS BVSc
Incursion Investigator
Investigation & Diagnostic Centres - Wallaceville Biosecurity New
Zealand Ministry of Agriculture and Forestry
Phone 04 894 5600 Fax 04 894 4973 Mobile 029 894 5611 Postal address:
Investigation and Diagnostic Centre- Wallaceville Box 40742 Ward St
Upper Hutt
########################################################################
This email message and...
2011 Nov 21
1
Lattice graph help
...if[,4]~ heif[,1]| heif[,3]+ heif[,2] ,ylab="titer",
layout = c(2,2), scales=list(x=list(at=c(seq(0, 60, by = 15)),tick.number=c(5),
labels=c(seq(0, 60, by = 15))))
)
useOuterStrips(x)
Kind regards
Andrew McFadden MVS BVSc | Veterinary Epidemiologist,
Investigation and Diagnostic Centre | Biosecurity New Zealand
Ministry of Agriculture and Forestry | 66 Ward St, Wallaceville | PO Box 40 742 | Upper Hutt | New Zealand
Telephone: 64-4-894 5611 | Facsimile: 64-4-894 4973| Mobile: 027-733-1791 | Web: www.maf.govt.nz
This email message and any attachment(s) is intended solely for the addressee(...
2008 May 13
1
Legend in scatterplot and adding regression lines
...= list(points =
Rows(trellis.par.get("superpose.symbol"), 1:4),
text = list(levels(Dataset$Operator)),
columns = 4))
Regards
Andy
Andrew McFadden MVS BVSc
Incursion Investigator
Investigation & Diagnostic Centres - Wallaceville Biosecurity New
Zealand Ministry of Agriculture and Forestry
Phone 04 894 5600 Fax 04 894 4973 Mobile 029 894 5611 Postal address:
Investigation and Diagnostic Centre- Wallaceville Box 40742 Ward St
Upper Hutt
########################################################################
This email message and...
2007 Dec 21
1
using apply to loop [SEC=UNCLASSIFIED]
...1)],1,which.max)
## or, if the maximum may be repeated:
classified <- apply(data[,-(nclass+1)], 1, FUN = function(x) which(x ==
max(x)))
# the variable _truth_ is just the last column of _data_ ?
truth <- data[,nclass + 1]
?table
z <- table(classified, truth)
HTH Joe
Joe Crombie
Biosecurity and Information Sciences
Bureau of Rural Science
Canberra Australia
e: joe.crombie at brs.gov.au
-----Original Message-----
From: r-help-bounces at r-project.org [mailto:r-help-bounces at r-project.org]
On Behalf Of Louis Martin
Sent: Friday, 21 December 2007 11:37 AM
To: R-help at r-project....
2008 Mar 06
2
R code for selecting places spatially and by time
...2,2,2,2,1,1)
)
date<-as.character(rep(as.Date(c("2008-01-02","2008-01-17","2008-01-01")
,format = "%Y-%m-%d"),c(4,4,2)))
cbind(x,y,date)
Regards
Andrew
Andrew McFadden MVS BVSc
Incursion Investigator
Investigation & Diagnostic Centres - Wallaceville Biosecurity New
Zealand Ministry of Agriculture and Forestry
Phone 04 894 5600 Fax 04 894 4973 Mobile 029 894 5611 Postal address:
Investigation and Diagnostic Centre- Wallaceville Box 40742 Ward St
Upper Hutt
########################################################################
This email message and...
2008 Apr 16
0
Instantaneous hazard of an event i.e. death
...ent this data graphically.
I think in theory I should be able to use: the "hazard.ratio.plot" but
lack the experience to know how to code this
Anyone be able to help?
Regards
Andrew
Andrew McFadden MVS BVSc
Incursion Investigator
Investigation & Diagnostic Centres - Wallaceville Biosecurity New
Zealand Ministry of Agriculture and Forestry
Phone 04 894 5600 Fax 04 894 4973 Mobile 029 894 5611 Postal address:
Investigation and Diagnostic Centre- Wallaceville Box 40742 Ward St
Upper Hutt
########################################################################
This email message and...
2008 Nov 11
0
Producing a matrix of values
...the highlighted code. I know that there
must be some descrepancy in the numbers of values I am using but don't
know why or how to fix it.
Thanks for your help in advance.
Kind regards
andy
Andrew McFadden MVS BVSc
Incursion Investigator
Investigation & Diagnostic Centres - Wallaceville Biosecurity New
Zealand Ministry of Agriculture and Forestry
########################################################################
This email message and any attachment(s) is intended solely for the
addressee(s) named above. The information it contains is confidential
and may be legally privileged. Un...
2011 Nov 22
0
Lattice graph strips and axes
...y = c(0.5),x = c(0.5)),scales = list(x = list(alternating = 1, tck = c(1,0)),
y = list(alternating = 1, tck = c(1,0))), xlab = "count (n)", ylab = "titer")
useOuterStrips(x)
Kind regards
Andrew McFadden MVS BVSc | Veterinary Epidemiologist,
Investigation and Diagnostic Centre | Biosecurity New Zealand
Ministry of Agriculture and Forestry | 66 Ward St, Wallaceville | PO Box 40 742 | Upper Hutt | New Zealand
Telephone: 64-4-894 5611 | Facsimile: 64-4-894 4973| Mobile: 027-733-1791 | Web: www.maf.govt.nz
This email message and any attachment(s) is intended solely for the addressee(...
2007 Nov 30
0
vector sprintf argument [SEC=UNCLASSIFIED]
Hi Tom,
Try this:
> G <- "Number: %s"
> sprintf(G, toString(A))
[1] "Number: 3, 4, 5"
Cheers Joe
Joe Crombie
Biosecurity and Information Sciences
Bureau of Rural Science
Canberra Australia
p: +61 2 6272 5906
e: joe.crombie at brs.gov.au
-----Original Message-----
From: r-help-bounces at r-project.org [mailto:r-help-bounces at r-project.org]
On Behalf Of Tom Sgouros
Sent: Friday, 30 November 2007 12:43 PM
To: r-...