setwd("/Users/francescodeleo/Desktop/rastafile") require(quantreg) require(splines) require(raster) require(maps) require(Rserve) invasive<-read.csv(file.choose("invasive"),header=TRUE,dec=",",sep=";",quote="\"") names(invasive) str(invasive) sp<-unique(invasive$species) for(k in 1:length(sp)){ png(paste(sp[k],'.png'),height=1000,width=750) par(cex=3,mfrow=c(3,3),lwd=2,mar=c(4,5,4,6)) pel_data<-invasive[invasive$species==sp[k],] pel_data$year<-as.numeric(pel_data$year) coordinates(pel_data)<-c('x.long','y.lat') m<-c(2009,2010,2011,2012,2013,2014,2015) for(i in 1:length(m)){ if(TRUE%in%(pel_data$year<=m[i]&pel_data$year<=m[i])){ pel_dataz<-pel_data[pel_data$year<=m[i]&pel_data$year<=m[i],] rasta<-raster(ext=extent(pel_data)*1.1,res=.33) rasta_fari<-rasterize(pel_dataz,rasta,field='species',fun="count",zlim=c(0,2)) } else rasta_fari<-raster(ext=extent(pel_data)*1.1,res=.33,vals=0) plot(log10(rasta_fari),main=paste('Year',m[i]), col=rev(heat.colors(20)),cex.main=2,xaxt='n',yaxt='n',legend.mar=10,legend.shrink =.95,legend.width=1.5, legend.args=list(text='log10(Number of blooms)',cex=.75,side=4,font=2,line=3.25)) map(add=T,col='grey',fill=T) } dev.off() }
Starting from Jellyfish sightings, we elaborate data to produce explicit geographical information concerning trend about the evolution and distribution of alien species according with MSF directive descriptors.
Trend in the evolution of invasive jellyfish distribution
http://ffoglini.livejournal.com/. "Trend in the evolution of invasive jellyfish distribution." ROHub. Jul 04 ,2016. https://w3id.org/ro-id/05a30007-abe3-4304-b26d-06962207456c.
Abstract Extensive blooms of gelatinous macrozooplankton species ('Jellyfish") have appeared in recent decades in Northern Adriatic (NA) waters. Anecdotal evidence suggests that these blooms have had a considerable impact on fishing operations, as this region is one of the most heavily exploited Mediterranean fishing grounds. In order to gain a better understanding of the possible economic losses for the Italian NA fishing industry due to jellyfish impacts, we conducted a survey of fishermen in the city of Chioggia, which is the main fishing port for the NA basin. The study focused on fishermen's perceptions about jellyfish blooms in the NA Sea and also investigated whether and how blooms compromised fishing operations. Survey results confirm that blooms have negatively affected fishing operations in the last few decades. We estimate that economic losses due to reduction in fish catches could amount to as much as (sic) 8.2 million per year for the Italian NA trawling fleet. Other costs on this fleet include additional fuel costs due to displacement of fishing operations, which could represent an increase in costs of over (sic) 460,000 per year. Moreover, during a jellyfish bloom episode it can happen that time has to be spent by fishermen to repair nets damaged by jellyfish caught in them, leading to an estimated cost for the trawling fleet and small scale fisheries of over 89,000 man-hours per year. This study not only confirms that jellyfish blooms have a considerable impact on fishing operations but also shows how costly blooms can be for the NA fisheries.
Jellyfish blooms in the Northern Adriatic Sea: Fishermen's perceptions and economic impacts on fisheries
Science and technology/Social sciences/Geography
Trend in the evolution of invasive jellyfish distribution.
Politics/International relations/Foreign aid
Lifestyle and leisure/Leisure/Recreational activities/Fishing
Moreover, during a jellyfish bloom episode it can happen that time has to be spent by fishermento repair nets damaged by jellyfish caught in them, leading to an estimated cost for the trawling fleetand small scale fisheries of over , man hours per year.
Economy, business and finance/Economic sector/Agriculture/Fishing industry
/s triplicates, so six libraries of dual indexed amplicons of bp were successfully sequenced on the MiSeq platform using a bp paired end sequencing strategy.
Economy, business and finance/Economic sector/Chemicals/Organic chemical
Extensive blooms of gelatinous macrozooplankton species ( Jellyfish ) have appeared in recent decadesin Northern Adriatic (NA) waters.
This study not only confirms that jellyfishblooms have a considerable impact on fishing operations but also shows how costly blooms can be forthe NA fisheries.
setwd("/Users/francescodeleo/Desktop/rastafile") require(quantreg) require(splines) require(raster) require(maps) require(Rserve) invasive<-read.csv(file.choose("invasive"),header=TRUE,dec=",",sep=";",quote="\"") names(invasive) str(invasive) sp<-unique(invasive$species) for(k in 1:length(sp)){ png(paste(sp[k],'.png'),height=1000,width=750) par(cex=3,mfrow=c(3,3),lwd=2,mar=c(4,5,4,6)) pel_data<-invasive[invasive$species==sp[k],] pel_data$year<-as.numeric(pel_data$year) coordinates(pel_data)<-c('x.long','y.lat') m<-c(2009,2010,2011,2012,2013,2014,2015) for(i in 1:length(m)){ if(TRUE%in%(pel_data$year<=m[i]&pel_data$year<=m[i])){ pel_dataz<-pel_data[pel_data$year<=m[i]&pel_data$year<=m[i],] rasta<-raster(ext=extent(pel_data)*1.1,res=.33) rasta_fari<-rasterize(pel_dataz,rasta,field='species',fun="count",zlim=c(0,2)) } else rasta_fari<-raster(ext=extent(pel_data)*1.1,res=.33,vals=0) plot(log10(rasta_fari),main=paste('Year',m[i]), col=rev(heat.colors(20)),cex.main=2,xaxt='n',yaxt='n',legend.mar=10,legend.shrink =.95,legend.width=1.5, legend.args=list(text='log10(Number of blooms)',cex=.75,side=4,font=2,line=3.25)) map(add=T,col='grey',fill=T) } dev.off()
Science and technology/Natural science/Biology/Genetics
C. Manzari B. Fosso A. Annese A. M. D Erchia M. Intranuovo E. Picardi G. PesoleDipartimento di Bioscienze, Biotecnologie e
The influence of invasive jellyfish blooms on the aquaticmicrobiome in a coastal lagoon (Varano, SE Italy) detectedby an Illumina based deep sequencing strategy