fish_draw {rfishdraw}

Automatically generated fish drawings via ggplot2

Description

Automatically generated fish drawings via ggplot2

Usage

fish_draw(data = NULL, x = x, y = y, group = group, ...)

Arguments

data

Path for *.json via get_polylines.

x

see aes for details

y

see aes for details

group

see aes for details

...

see geom_path for details

Value

ggplot object.

Author(s)

Liuyong Ding [e-mail]

Examples

## Not run: 
# fish drawings via plot
file <- system.file("extdata",package = "rfishdraw")
dat <- readRDS(paste0(file,"/","output_json.rds"))
for (i in seq(length(dat))) {
dat[[i]] <- cbind(dat[[i]],i)
}
plot(NA, xlim = c(0,520),ylim = c(-320,0),axes = F,xlab = " ",ylab = " ")
for(i in seq(length(dat))) {
  lines(x = dat[[i]][,1],y = -dat[[i]][,2], lwd=2, col = "blue")
}

# fish drawings via ggplot2
fish_draw()

## End(Not run)