README.md

swistrackr

O pacote R swistrackr é um conjunto de scripts que auxiliam na análise de dados de rastreamento de objetos com base em dados de coordenadas x e y. Inicialmente, este pacote R foi criado para ser aplicado em conjunto com dados provenientes do software livre Swistrack4, mas podem ser aplicados em outros conjuntos de dados que utilizem coordenadas x e y para localizar um objeto ao longo do tempo.

Instalação

Para o processo de rastreamento de objetos até a análise dos dados, utilizamos as seguintes ferramentas:

Swistrack4

No SourceForge você encontra para download o software Swistrack4 para Windows. Também é necessário a instalação do pacote de codecs de vídeos K-Lite Codec Pack (recomendanos o download da versão Mega). Se houver dúvidas, você pode acessar este tutorial de instalação do Swistrack4 para Windows. Você também pode acessar ao tutorial de preparação de arquivos e ao tutorial de utilização do Swistrack4 para informações de como utilizar o programa para rastreamento de objetos em vídeos.

FFmpeg

O FFmpeg é uma biblioteca de código aberto, utilizada para edição de áudio e vídeo através de linhas de comando. O pacote R swistrackr utiliza o FFmpeg em algumas de suas funções para obter dados de vídeo e imagem, mas de forma mais prática e que não exigem do usuário trabalho de codificação mais avançada. Para mais informações, você pode acessar este tutorial de instalação do FFmpeg e sua configuração no sistema.

swistrackr

O pacote R swistrackr se encontra depositado no Github. Para instalação utilize:

```{package install, message=FALSE} if(!require(devtools)){ install.packages('devtools') } devtools::install_github("kalebepinto/swistrackr", build_vignettes = TRUE)


## Utilização do pacote

### Obter informacoes de dimensao do arquivo background.jpg
```{r setup background}
bg.image <- swistrackr::background(image.jpg = system.file('extdata', 'bg-swistrack-1.jpg', package = 'swistrackr'))
bg.image

Obter informacoes de duracao e framerate do video

```{r setup track_video}

video.swtr <- swistrackr::track_video(video.avi = system.file('extdata', 'video-swistrack-1.avi', package = 'swistrackr'))

video.swtr


### Definir zonas de interesse no video
```{r setup zones}
#zones.swtr <- zones('image.jpg = bg.image', nzones = 2, pzones = 4)
#zones.swtr

Calcular o tempo em que o objeto permaneceu nas zonas de interesse

```{r setup times}

times(output.swtr, zones.swtr, video.swtr)

```

Licença

O pacote R swistrackr é de código aberto e livre para contribuições.



kalebepinto/swistrackr documentation built on June 30, 2022, 6:35 a.m.