Movatterモバイル変換

aRtsy — Generative Art usingggplot2

Description

aRtsy aims to make generative art accessible to the general public in a straightforward and standardized manner. The package provides algorithms for creating artworks that incorporate some form of randomness and are dependent on the setseed. Each algorithm is implemented in a separate function with its own set of parameters that can be tweaked.

For documentation onaRtsy itself, including the manual and user guidefor the package, worked examples, and othertutorial information visit thepackage website.

Author(s)

Please use the citation provided byR when citing this package. A BibTex entry is available fromcitation("aRtsy").

See Also

Useful links:

• Thetwitter feed to check the artwork of the day.

• Theissue page to submit a bug report or feature request.

Draw Langton's Ant

Description

This function draws Langton's Ant on a canvas. Langton's Ant isa two-dimensional cellular automaton that is named after its creator, ChrisLangton. See theDetails section for more specific information aboutthe algorithm used in this function.

Usage

canvas_ant(  colors,  background = "#fafafa",  iterations = 1000000,  resolution = 500)

Arguments

Details

The algorithm for Langton's Ant involves the following steps:

• Set up a two-dimensional grid of cells, where each cell can either be"colored" or "non-colored." The initial state of the grid is usually asingle non-colored cell in the center of the grid.

• Place an "ant" on the grid at the position of the initial non-coloredcell. The ant can move in four directions: up, down, left, or right.

• At each step of the algorithm, the ant examines the color of the cellit is currently on. If the cell is non-colored, the ant turns 90 degreesclockwise, colors the cell, and moves forward one unit.

• If the cell is colored, the ant turns 90 degrees counterclockwise,uncolors the cell, and moves forward one unit.

• The ant continues to move around the grid, following these rules ateach step. If a certain number of iterations has passed, the ant choosesa different color which corresponds to a different combination of theserules.

Value

Aggplot object containing the artwork.

Author(s)

Koen Derks,koen-derks@hotmail.com

References

https://en.wikipedia.org/wiki/Langtons_ant

See Also

colorPalette

Examples

set.seed(1)# Simple examplecanvas_ant(colors = colorPalette("house"))

Draw Blacklights

Description

This function draws Blacklights on a canvas using a SupportVector Machine (SVM) algorithm. SVM's are a type of supervised learningalgorithm that can be used for classification and regression purposes. Themain goal of the SVM technique is to find a hyperplane (decision boundary)that best separates the values in the training dataset. This function drawsthe predictions from the SVM algorithm fitted on a randomly generatedcontinuous training data set.

Usage

canvas_blacklight(  colors,  n = 1000,  resolution = 500)

Arguments

Value

Aggplot object containing the artwork.

Author(s)

Koen Derks,koen-derks@hotmail.com

References

https://en.wikipedia.org/wiki/Support-vector_machine

See Also

colorPalette

Examples

set.seed(1)# Simple examplecanvas_blacklight(colors = colorPalette("tuscany2"))

Draw Chladni Figures

Description

This function draws Chladni figures on a canvas. Named afterErnst Chladni, an 18th century physicist who first discovered them, Chladnifigures are patterns that arise from the vibrations of a two-dimensionalplate, typically covered with a thin layer of sand or powder. The Chladnifigures are created by varying the frequency of vibration applied to theplate. In this implementation, the grid underneath the plate can betransformed using a domain warping technique. The basic idea behind domainwarping is to apply a series of transformations to the input grid to createa more complex and interesting output.

Usage

canvas_chladni(  colors,  waves = 5,  warp = 0,  resolution = 500,  angles = NULL,  distances = NULL,  flatten = FALSE)

Arguments

Value

Aggplot object containing the artwork.

Author(s)

Koen Derks,koen-derks@hotmail.com

See Also

colorPalette

Examples

set.seed(2)# Simple examplecanvas_chladni(colors = colorPalette("origami"))# Advanced examplecanvas_chladni(  colors = colorPalette("lava"),  waves = c(1, 2, 3, 9),  warp = 1)

Draw a Circle Map

Description

This function draws a circle map on a canvas. A circle map is anonlinear dynamic system that can exhibit a phenomenon known as Arnold'stongue: a visualization of the frequency-locking behavior of a nonlinearoscillator with a periodic external force. The tongue is a region in theparameter space of the oscillator where the frequency of the oscillatormatches the frequency of the external force. The tongue appears as a seriesof tongues of varying widths and shapes that can extend into regions of theparameter space where the frequency locking does not occur.

Usage

canvas_circlemap(  colors,  left = 0,  right = 12.56,  bottom = 0,  top = 1,  iterations = 10,  resolution = 1500)

Arguments

Value

Aggplot object containing the artwork.

Author(s)

Koen Derks,koen-derks@hotmail.com

References

https://en.wikipedia.org/wiki/Arnold_tongue

https://linas.org/art-gallery/circle-map/circle-map.html

See Also

colorPalette

Examples

canvas_circlemap(colors = colorPalette("dark2"))

Draw Cobwebs

Description

This function draws a cobweb on the canvas. The cobweb consistsof many Fibonacci spirals shifted by random noise from a normal distribution.A Fibonacci spiral is a logarithmic spiral that is derived from theFibonacci sequence, a mathematical sequence where each number is the sum ofthe two preceding ones. The spiral is created by connecting the corners ofsquares that are sized according to the Fibonacci sequence. Specifically, ifwe draw a sequence of squares with side lengths of 1, 1, 2, 3, 5, 8, 13, andso on, each square can be arranged so that it is tangent to the previoussquare at a corner. When we connect these corners with a smooth curve, theresulting shape is the Fibonacci spiral.

Usage

canvas_cobweb(  colors,  background = "#fafafa",  lines = 300,  iterations = 100)

Arguments

Value

Aggplot object containing the artwork.

Author(s)

Koen Derks,koen-derks@hotmail.com

See Also

colorPalette

Examples

set.seed(1)# Simple examplecanvas_cobweb(colors = colorPalette("neon1"), background = "black")

Draw Collatz Sequences

Description

This function draws the Collatz conjecture on a canvas. Theconjecture of the Collatz sequence is that no matter what positive integeris chosen as the starting point of the sequence, the sequence willeventually reach the number 1. This conjecture has been verified for allstarting integers up to very large numbers, but it has not been provenmathematically. Despite its simple rule, the sequence can produce long andcomplicated chains of numbers before eventually reaching 1. See theDetails section for more specific information about the algorithmused in this function.

Usage

canvas_collatz(  colors,  background = "#fafafa",  n = 200,  angle.even = 0.0075,  angle.odd = 0.0145,  side = FALSE)

Arguments

Details

The Collatz sequence, also known as the3n+1 problem, is asequence of numbers generated by the following rule:

• Start with any positive integern.

• Ifn is even, divide it by 2.

• Ifn is odd, multiply it by 3 and add 1.

• Repeat this process with the new value ofn, generating a newnumber in the sequence.

Value

Aggplot object containing the artwork.

Author(s)

Koen Derks,koen-derks@hotmail.com

References

https://nl.wikipedia.org/wiki/Collatz_Conjecture

See Also

colorPalette

Examples

set.seed(1)# Simple examplecanvas_collatz(colors = colorPalette("tuscany3"))

Draw Diamonds

Description

This function draws diamonds on a canvas and (optionally) places two lines behind them. The diamonds can be transparent or have a random color sampled from the input.

Usage

canvas_diamonds(  colors,  background = "#fafafa",  col.line = "black",  radius = 10,  alpha = 1,  p = 0.2,  resolution = 500)

Arguments

Value

Aggplot object containing the artwork.

Author(s)

Koen Derks,koen-derks@hotmail.com

See Also

colorPalette

Examples

set.seed(1)# Simple examplecanvas_diamonds(colors = colorPalette("tuscany1"))

Draw a Fractal Flame

Description

This function implements the fractal flame algorithm.

Usage

canvas_flame(  colors,  background = "#000000",  iterations = 1000000,  variations = 0,  symmetry = 0,  blend = TRUE,  weighted = FALSE,  post = FALSE,  final = FALSE,  extra = FALSE,  display = c("colored", "logdensity"),  zoom = 1,  resolution = 1000,  gamma = 1)

Arguments

Details

Thevariation argument can be used to include specific variations into the flame. See the appendix in the references for examples of all variations. Possible variations are:

• 0: Linear (default)

• 1: Sinusoidal

• 2: Spherical

• 3: Swirl

• 4: Horsehoe

• 5: Polar

• 6: Handkerchief

• 7: Heart

• 8: Disc

• 9: Spiral

• 10: Hyperbolic

• 11: Diamond

• 12: Ex

• 13: Julia

• 14: Bent

• 15: Waves

• 16: Fisheye

• 17: Popcorn

• 18: Exponential

• 19: Power

• 20: Cosine

• 21: Rings

• 22: Fan

• 23: Blob

• 24: PDJ

• 25: Fan2

• 26: Rings2

• 27: Eyefish

• 28: Bubble

• 29: Cylinder

• 30: Perspective

• 31: Noise

• 32: JuliaN

• 33: JuliaScope

• 34: Blur

• 35: Gaussian

• 36: RadialBlur

• 37: Pie

• 38: Ngon

• 39: Curl

• 40: Rectangles

• 41: Arch

• 42: Tangent

• 43: Square

• 44: Rays

• 45: Blade

• 46: Secant

• 47: Twintrian

• 48: Cross

Thesymmetry argument can be used to include symmetry into the flame. Possible options are:

• 0: No symmetry (default)

• -1: Dihedral symmetry

• 1: Two-way rotational symmetry

• (-)2: (Dihedral) Three-way rotational symmetry

• (-)3: (Dihedral) Four-way rotational symmetry

• (-)4: (Dihedral) Five-way rotational symmetry

• (-)5: (Dihedral) Six-way rotational symmetry

• (-)6: (Dihedral) Snowflake symmetry

Value

Aggplot object containing the artwork.

Author(s)

Koen Derks,koen-derks@hotmail.com

References

https://flam3.com/flame_draves.pdf

See Also

colorPalette

Examples

set.seed(3)# Simple example, linear variation, relatively few iterationscanvas_flame(colors = c("dodgerblue", "green"), variations = 0)# Simple example, linear variation, dihedral symmetrycanvas_flame(colors = c("hotpink", "yellow"), variations = 0, symmetry = -1, iterations = 1e7)# Advanced example (no-blend, weighted, sinusoidal and spherical variations)canvas_flame(  colors = colorPalette("origami"), variations = c(1, 2),  blend = FALSE, weighted = TRUE, iterations = 1e8)# More iterations give much better imagesset.seed(123)canvas_flame(colors = c("red", "blue"), iterations = 1e8, variations = c(10, 17))

Draw A Flow Field

Description

This function draws flow fields on a canvas. The algorithm simulates the flow of points through a field of angles which can be set manually or generated from the predictions of a supervised learning method (i.e., knn, svm, random forest) trained on randomly generated data.

Usage

canvas_flow(  colors,  background = "#fafafa",  lines = 500,  lwd = 0.05,  iterations = 100,  stepmax = 0.01,  outline = c("none", "circle", "square"),  polar = FALSE,  angles = NULL)

Arguments

Value

Aggplot object containing the artwork.

Author(s)

Koen Derks,koen-derks@hotmail.com

References

https://tylerxhobbs.com/essays/2020/flow-fields

See Also

colorPalette

Examples

set.seed(1)# Simple examplecanvas_flow(colors = colorPalette("dark2"))# Outline examplecanvas_flow(  colors = colorPalette("vrolik1"), lines = 10000,  outline = "circle", iterations = 10, angles = "svm")# Polar examplecanvas_flow(  colors = colorPalette("vrolik2"), lines = 300,  lwd = 0.5, polar = TRUE)# Advanced exampleangles <- matrix(0, 200, 200)angles[1:100, ] <- seq(from = 0, to = 2 * pi, length = 100)angles[101:200, ] <- seq(from = 2 * pi, to = 0, length = 100)angles <- angles + rnorm(200 * 200, sd = 0.1)canvas_flow(  colors = colorPalette("tuscany1"), background = "black",  angles = angles, lwd = 0.4, lines = 1000, stepmax = 0.001)

Draw a Random Forest

Description

This function draws the predictions from a random forest algorithm trained on randomly generated categorical data.

Usage

canvas_forest(  colors,  n = 1000,  resolution = 500)

Arguments

Value

Aggplot object containing the artwork.

Author(s)

Koen Derks,koen-derks@hotmail.com

References

https://en.wikipedia.org/wiki/Random_forest

See Also

colorPalette

Examples

set.seed(1)# Simple examplecanvas_forest(colors = colorPalette("jungle"))

Draw Functions

Description

This function paints functions with random parameters on a canvas.

Usage

canvas_function(  colors,  background = "#fafafa",  by = 0.01,  polar = TRUE,  formula = NULL)

Arguments

Value

Aggplot object containing the artwork.

Author(s)

Koen Derks,koen-derks@hotmail.com

References

https://github.com/cutterkom/generativeart

See Also

colorPalette

Examples

set.seed(10)# Simple examplecanvas_function(colors = colorPalette("tuscany1"))# Advanced exampleformula <- list(  x = quote(x_i^2 - sin(y_i^2)),  y = quote(y_i^3 - cos(x_i^2)))canvas_function(colors = "firebrick", formula = formula)

Draw Gemstones

Description

This function draws the predictions from a k-nearest neighbors algorithm trained on randomly generated continuous data.

Usage

canvas_gemstone(  colors,  n = 1000,  resolution = 500)

Arguments

Value

Aggplot object containing the artwork.

Author(s)

Koen Derks,koen-derks@hotmail.com

References

https://en.wikipedia.org/wiki/K-nearest_neighbors_algorithm

See Also

colorPalette

Examples

set.seed(1)# Simple examplecanvas_gemstone(colors = colorPalette("dark3"))

Draw a Lissajous Curve

Description

This function draws lissajous curves with points connected via a k-nearest neighbor approach.

Usage

canvas_lissajous(  colors,  background = "#000000",  iterations = 2,  neighbors = 50,  noise = FALSE)

Arguments

Value

Aggplot object containing the artwork.

Author(s)

Koen Derks,koen-derks@hotmail.com

References

https://en.wikipedia.org/wiki/Lissajous_curve

See Also

colorPalette

Examples

set.seed(13)# Simple examplecanvas_lissajous(colors = colorPalette("blossom"))

Draw the Mandelbrot Set

Description

This function draws the Mandelbrot set and other related fractal sets on the canvas.

Usage

canvas_mandelbrot(  colors,  iterations = 100,  zoom = 1,  set = c("mandelbrot", "multibrot", "julia", "ship"),  left = -2.16,  right = 1.16,  bottom = -1.66,  top = 1.66,  resolution = 500)

Arguments

Value

Aggplot object containing the artwork.

Author(s)

Koen Derks,koen-derks@hotmail.com

References

https://en.wikipedia.org/wiki/Mandelbrot_set

See Also

colorPalette

Examples

canvas_mandelbrot(colors = colorPalette("tuscany1"), set = "mandelbrot")canvas_mandelbrot(colors = colorPalette("flag"), set = "julia", zoom = 2)

Draw Mazes

Description

This function draws a maze on a canvas.

Usage

canvas_maze(  color = "#fafafa",  walls = "black",  background = "#fafafa",  resolution = 20,  polar = FALSE)

Arguments

Value

Aggplot object containing the artwork.

Author(s)

Koen Derks,koen-derks@hotmail.com

References

https://github.com/matfmc/mazegenerator

See Also

colorPalette

Examples

set.seed(1)# Simple examplecanvas_maze(color = "#fafafa")

Draw Meshes

Description

This function draws one or more rotating circular morphing meshes on the canvas.

Usage

canvas_mesh(  colors,  background = "#fafafa",  transform = c("perlin", "fbm", "simplex", "cubic",                "worley", "knn", "rf", "svm"),  lines = 500,  iterations = 500,  mixprob = 0)

Arguments

Value

Aggplot object containing the artwork.

Author(s)

Koen Derks,koen-derks@hotmail.com

References

https://web.archive.org/web/20231130151102/http://rectangleworld.com/blog/archives/462

See Also

colorPalette

Examples

set.seed(2)# Simple examplecanvas_mesh(colors = colorPalette("origami"))

Draw Moisaics

Description

This function draws the predictions from a k-nearest neighbors algorithm trained on randomly generated categorical data.

Usage

canvas_mosaic(  colors,  n = 1000,  resolution = 500)

Arguments

Value

Aggplot object containing the artwork.

Author(s)

Koen Derks,koen-derks@hotmail.com

References

https://en.wikipedia.org/wiki/K-nearest_neighbors_algorithm

See Also

colorPalette

Examples

set.seed(1)# Simple examplecanvas_mosaic(colors = colorPalette("retro2"))

Draw Nebulas

Description

This function creates an artwork from randomly generated k-nearest neighbors noise.

Usage

canvas_nebula(  colors,  k = 50,  n = 500,  resolution = 500)

Arguments

Value

Aggplot object containing the artwork.

Author(s)

Koen Derks,koen-derks@hotmail.com

See Also

colorPalette

Examples

set.seed(1)# Simple examplecanvas_nebula(colors = colorPalette("tuscany1"))

Draw Petri Dish Colonies

Description

This function uses a space colony algorithm to draw Petri dish colonies.

Usage

canvas_petri(  colors,  background = "#fafafa",  dish = "black",  attractors = 1000,  iterations = 15,  hole = 0)

Arguments

Value

Aggplot object containing the artwork.

Author(s)

Koen Derks,koen-derks@hotmail.com

References

https://medium.com/@jason.webb/space-colonization-algorithm-in-javascript-6f683b743dc5

See Also

colorPalette

Examples

set.seed(2)# Simple examplecanvas_petri(colors = colorPalette("origami"))# Advanced examplecanvas_petri(colors = "white", hole = 0.8, attractors = 5000)

Draw a Phyllotaxis

Description

This function draws a phyllotaxis which resembles the arrangement of leaves on a plant stem.

Usage

canvas_phyllotaxis(  colors,  background = "#fafafa",  iterations = 10000,  angle = 137.5,  size = 0.01,  alpha = 1,  p = 0.5)

Arguments

Value

Aggplot object containing the artwork.

Author(s)

Koen Derks,koen-derks@hotmail.com

References

https://en.wikipedia.org/wiki/Phyllotaxis

See Also

colorPalette

Examples

set.seed(1)# Simple examplecanvas_phyllotaxis(colors = colorPalette("tuscany1"))

Draw Planets

Description

This function paints one or multiple planets and uses a cellular automata to fill their surfaces.

Usage

canvas_planet(  colors,  threshold = 4,  iterations = 200,  starprob = 0.01,  fade = 0.2,  radius = NULL,  center.x = NULL,  center.y = NULL,  light.right = TRUE,  resolution = 1500)

Arguments

Value

Aggplot object containing the artwork.

Author(s)

Koen Derks,koen-derks@hotmail.com

References

https://fronkonstin.com/2021/01/02/neighborhoods-experimenting-with-cyclic-cellular-automata/

Examples

set.seed(1)# Simple examplecanvas_planet(colors = colorPalette("lava"), threshold = 3)# Advanced examplecolors <- list(  c("khaki1", "lightcoral", "lightsalmon"),  c("dodgerblue", "forestgreen", "white"),  c("gray", "darkgray", "beige"))canvas_planet(colors,  radius = c(800, 400, 150),  center.x = c(1, 500, 1100),  center.y = c(1400, 500, 1000),  starprob = 0.005)

Draw Polygons and Lines

Description

This function draws many points on the canvas and connects these points into a polygon. After repeating this for all the colors, the edges of all polygons are drawn on top of the artwork.

Usage

canvas_polylines(  colors,  background = "#fafafa",  ratio = 0.5,  iterations = 1000,  size = 0.1,  resolution = 500)

Arguments

Value

Aggplot object containing the artwork.

Author(s)

Koen Derks,koen-derks@hotmail.com

See Also

colorPalette

Examples

set.seed(1)# Simple examplecanvas_polylines(colors = colorPalette("retro1"))

Draw Recaman's Sequence

Description

This function draws Recaman's sequence on a canvas. The algorithm takes increasingly large steps backward on the positive number line, but if it is unable to it takes a step forward.

Usage

canvas_recaman(  colors,  background = "#fafafa",  iterations = 100,  start = 0,  increment = 1,  curvature = 1,  angle = 0,  size = 0.1,  closed = FALSE)

Arguments

Value

Aggplot object containing the artwork.

Author(s)

Koen Derks,koen-derks@hotmail.com

References

https://mathworld.wolfram.com/RecamansSequence.html

See Also

colorPalette

Examples

set.seed(1)# Simple examplecanvas_recaman(colors = colorPalette("tuscany1"))

Draw Ribbons

Description

This function paints random ribbons and (optionally) a triangle in the middle.

Usage

canvas_ribbons(  colors,  background = "#fdf5e6",  triangle = TRUE)

Arguments

Value

Aggplot object containing the artwork.

Author(s)

Koen Derks,koen-derks@hotmail.com

See Also

colorPalette

Examples

set.seed(1)# Simple examplecanvas_ribbons(colors = colorPalette("retro1"))

Draw Segments

Description

This function draws line segments on a canvas. The length and direction of the line segments is determined randomly.

Usage

canvas_segments(  colors,  background = "#fafafa",  n = 250,  p = 0.5,  H = 0.1,  size = 0.2)

Arguments

Value

Aggplot object containing the artwork.

Author(s)

Koen Derks,koen-derks@hotmail.com

See Also

colorPalette

Examples

set.seed(1)# Simple examplecanvas_segments(colors = colorPalette("dark1"))

Draw A Slime Mold

Description

This function draws the Physarum polycephalum slime mold on acanvas. The algorithm simulates particles on a two-dimensional grid thatmove towards areas on the grid with a high intensity.

Usage

canvas_slime(  colors,  background = "#000000",  iterations = 2000,  agents = 1000,  layout = c(     "random", "gaussian", "circle", "grid",     "clusters", "arrows", "wave", "spiral"  ),  resolution = 1000)

Arguments

Value

Aggplot object containing the artwork.

Author(s)

Koen Derks,koen-derks@hotmail.com

References

https://cargocollective.com/sagejenson/physarum

https://fronkonstin.com/2020/08/11/abstractions/

See Also

colorPalette

Examples

set.seed(1)# Simple examplecanvas_slime(colors = colorPalette("neon1"))

Draw Rainbow Smoke

Description

This function implements the rainbow smoke algorithm.

Usage

canvas_smoke(  colors,  init = 1,  shape = c("bursts", "clouds"),  algorithm = c("minimum", "average"),  resolution = 150)

Arguments

Value

Aggplot object containing the artwork.

Author(s)

Koen Derks,koen-derks@hotmail.com

References

http://rainbowsmoke.hu

See Also

colorPalette

Examples

set.seed(1)# Simple examplecanvas_smoke(colors = "all", resolution = 500)# Advanced examplereds <- colorRampPalette(c("red", "black"))blues <- colorRampPalette(c("goldenrod", "navyblue"))palette <- c(reds(100), blues(100))canvas_smoke(colors = palette, init = 3, shape = "clouds", resolution = 500)

Draw Split Lines

Description

This function draws split lines.

Usage

canvas_splits(  colors,  background = "#fafafa",  iterations = 6,  sd = 0.2,  lwd = 0.05,  alpha = 0.5)

Arguments

Value

Aggplot object containing the artwork.

Author(s)

Koen Derks,koen-derks@hotmail.com

See Also

colorPalette

Examples

set.seed(2)# Simple examplecanvas_splits(colors = "black", sd = 0)# Simple examplecanvas_splits(colors = colorPalette("dark2"), background = "black", sd = 1)

Draw Squares and Rectangles

Description

This function paints random squares and rectangles. It works by repeatedly cutting into the canvas at random locations and coloring the area that these cuts create.

Usage

canvas_squares(  colors,  background = "#000000",  cuts = 50,  ratio = 1.618,  resolution = 200,  noise = FALSE)

Arguments

Value

Aggplot object containing the artwork.

Author(s)

Koen Derks,koen-derks@hotmail.com

See Also

colorPalette

Examples

set.seed(1)# Simple examplecanvas_squares(colors = colorPalette("retro2"))

Draw Stripes

Description

This function creates a brownian motion on each row of the artwork and colors it according to the height of the motion.

Usage

canvas_stripes(  colors,  n = 300,  H = 1,  burnin = 1)

Arguments

Value

Aggplot object containing the artwork.

Author(s)

Koen Derks,koen-derks@hotmail.com

See Also

colorPalette

Examples

set.seed(1)# Simple examplecanvas_stripes(colors = colorPalette("random", n = 10))

Draw Strokes

Description

This function creates an artwork that resembles paints strokes. The algorithm is based on the simple idea that each next point on the grid has a chance to take over the color of an adjacent colored point but also has a change of generating a new color.

Usage

canvas_strokes(  colors,  neighbors = 1,  p = 0.01,  iterations = 1,  resolution = 500,  side = FALSE)

Arguments

Value

Aggplot object containing the artwork.

Author(s)

Koen Derks,koen-derks@hotmail.com

See Also

colorPalette

Examples

set.seed(1)# Simple examplecanvas_strokes(colors = colorPalette("tuscany1"))

Draw Swirls

Description

This function draws swirling stripes on a canvas by simulating aparticle system.

Usage

canvas_swirls(  colors,  background = "#fafafa",  iterations = 250,  n = 250,  curvature = 0.005,  lwd = 0.1,  resolution = 500)

Arguments

Value

Aggplot object containing the artwork.

Author(s)

Koen Derks,koen-derks@hotmail.com

References

https://mattdesl.svbtle.com/generative-art-with-nodejs-and-canvas

See Also

colorPalette

Examples

set.seed(2)# Simple examplecanvas_swirls(colors = colorPalette("origami"))

Draw Portuguese Tiles

Description

This function uses a reaction diffusion algorithm in an attempt to draw a Portuguese-styled tiling pattern.

Usage

canvas_tiles(  colors,  background = "#ffffff",  iterations = 1000,  size = 5,  col.line = "#000000",  resolution = 100,  layout = NULL)

Arguments

Value

Aggplot object containing the artwork.

Author(s)

Koen Derks,koen-derks@hotmail.com

References

https://en.wikipedia.org/wiki/Reaction–diffusion_system

See Also

colorPalette

Examples

set.seed(3)# Simple examplecanvas_tiles(colors = colorPalette("azul"), iterations = 5000)# Advanced examplecanvas_tiles(colors = list(  colorPalette("blossom"),  colorPalette("neon1"),  colorPalette("dark1")))# Custom layoutlayout <- matrix(c(  1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,  1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,  1, 1, 1, 2, 1, 1, 1, 2, 1, 1, 1,  1, 1, 2, 2, 2, 1, 2, 2, 2, 1, 1,  1, 2, 2, 2, 2, 2, 2, 2, 2, 2, 1,  1, 1, 2, 2, 2, 2, 2, 2, 2, 1, 1,  1, 1, 1, 2, 2, 2, 2, 2, 1, 1, 1,  1, 1, 1, 1, 2, 2, 2, 1, 1, 1, 1,  1, 1, 1, 1, 1, 2, 1, 1, 1, 1, 1,  1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,  1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1), nrow = 11, byrow = TRUE)canvas_tiles(  colors = list(colorPalette("azul"), colorPalette("blossom")),  size = nrow(layout), layout = layout)# Another custom layoutset.seed(11)layout <- matrix(c(  2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,  2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,  2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,  2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,  2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,  7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7,  2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,  2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,  2, 2, 1, 2, 2, 3, 3, 2, 2, 4, 4, 4, 2, 5, 5, 5, 2, 6, 2, 6, 2,  2, 1, 2, 1, 2, 3, 2, 3, 2, 2, 4, 2, 2, 5, 2, 2, 2, 6, 2, 6, 2,  2, 1, 1, 1, 2, 3, 3, 2, 2, 2, 4, 2, 2, 2, 5, 2, 2, 2, 6, 2, 2,  2, 1, 2, 1, 2, 3, 2, 3, 2, 2, 4, 2, 5, 5, 5, 2, 2, 2, 6, 2, 2,  2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,  2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,  7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7,  2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,  2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,  2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,  2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,  2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,  2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2), nrow = 21, byrow = TRUE)canvas_tiles(  colors = list(    colorPalette("blossom"),    colorPalette("azul"),    colorPalette("neon1"),    colorPalette("mixer4"),    colorPalette("neon2"),    colorPalette("vrolik1"),    colorPalette("blackwhite")  ),  iterations = 2000,  size = nrow(layout), layout = layout)

Draw Turmites

Description

This function paints a turmite. A turmite is a Turing machine which has an orientation in addition to a current state and a "tape" that consists of a two-dimensional grid of cells.

Usage

canvas_turmite(  colors,  background = "#fafafa",  p = 0,  iterations = 1000000,  resolution = 500,  noise = FALSE)

Arguments

Details

The turmite algorithm consists of the following steps: 1) turn on the spot (left, right, up, down) 2) change the color of the square 3) move forward one square.

Value

Aggplot object containing the artwork.

Author(s)

Koen Derks,koen-derks@hotmail.com

References

https://en.wikipedia.org/wiki/Turmite

See Also

colorPalette

Examples

set.seed(1)# Simple examplecanvas_turmite(colors = colorPalette("dark2"))

Draw Watercolors

Description

This function paints watercolors on a canvas.

Usage

canvas_watercolors(  colors,  background = "#fafafa",  layers = 50,  depth = 2,  resolution = 250)

Arguments

Value

Aggplot object containing the artwork.

Author(s)

Koen Derks,koen-derks@hotmail.com

References

https://tylerxhobbs.com/essays/2017/a-generative-approach-to-simulating-watercolor-paints

See Also

colorPalette

Examples

set.seed(1)# Simple examplecanvas_watercolors(colors = colorPalette("tuscany2"))

Color Palette Generator

Description

This function creates a random color palette, or allows the user to select a pre-implemented palette.

Usage

colorPalette(  name,  n = NULL)

Arguments

Details

The following color palettes are implemented:

Value

A vector of colors.

Author(s)

Koen Derks,koen-derks@hotmail.com

Examples

colorPalette("divergent", 5)

Save a Canvas to an External Device

Description

This function is a wrapper aroundggplot2::ggsave. It provides a suggested export with square dimensions for a canvas created using theaRtsy package.

Usage

saveCanvas(plot, filename, width = 7, height = 7, dpi = 300)

Arguments

Value

No return value, called for saving plots.

Author(s)

Koen Derks,koen-derks@hotmail.com

Canvas Theme for ggplot2 Objects

Description

Add a canvas theme to the plot. The canvas theme by default has no margins and fills any empty canvas with a background color.

Usage

theme_canvas(x, background = NULL, margin = 0)

Arguments

Value

Aggplot object containing the artwork.

Author(s)

Koen Derks,koen-derks@hotmail.com