def.source.hook <- knitr::knit_hooks$get("source") knitr::knit_hooks$set(source = function(x, options) { x <- def.source.hook(x, options) # apply default source hook ifelse(!is.null(options$size), paste0("\\vspace{0.1cm}\\", options$size,"\n", x,"\n", "\\normalsize\\vspace{0.1cm}"), x) }) def.output.hook <- knitr::knit_hooks$get("output") knitr::knit_hooks$set(output = function(x, options) { x <- def.output.hook(x, options) # apply default source hook ifelse(!is.null(options$size_out), paste0("\\vspace{0.1cm}\\", options$size_out,"\n", x,"\n", "\\normalsize\\vspace{0.1cm}"), x) })
This is the online version of my Master Thesis called "Asset Allocation using Particle Swarm Optimization in R". In this thesis the Particle Swarm Optimization is extensively analyzed and tested for optimization problems in quantitative portfolio management. The PDF version can be downloaded by clicking the PDF button at the top of the page.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.