In khuggler/Ovis: Tools to Manipulate, Collate, and Analyze BHS Data from Idaho and Wyoming

\pdfminorversion=5 \pdfcompresslevel=9 \pdfobjcompresslevel=2

pdf.options(useDingbats = TRUE,compress=T)
library(knitr)
library(jpeg)
tabby<-readRDS(params$tabby)
ll<-readRDS(params$ll)
#ll<-readRDS(fn[,2])

\begin{figure}[h] \centerline{\includegraphics{r params$plotlink}} \end{figure}

plotpath<-params$plotlink
pp<-gsub(params$basepath,'',plotpath)

pp<-gsub('.png','',pp)
pp<-as.numeric(gsub('.','',as.character(as.numeric(paste0(substr(pp,1,3),'.',substr(pp,4,7)))),fixed=T))

a<-ll[which(as.numeric(ll$MatchFreq)==as.numeric(pp)),]
a<-a[order(a$TelemDate),]


#a<-a[,-nrow(a)]
a<-a[,-ncol(a)]



kable(a,format='markdown',row.names=F,align='c',digits=2,padding=0,caption='Recent Locations')

khuggler/Ovis documentation built on Nov. 30, 2023, 7:41 p.m.