fix spelling

Author: nrennie

DESCRIPTION

@@ -1,6 +1,6 @@
 Package: aRt
 Title: Generative Art with R
-Version: 1.3.0
+Version: 1.3.1
 Authors@R: 
     person(given = "Nicola",
            family = "Rennie",

NEWS.md

@@ -1,3 +1,7 @@
+## aRt 1.3.1
+
+* Fix spelling of `granularity` in `flow_fields()`
+
 ## aRt 1.3.0
 
 * add {lwgeom}, {cowplot}, {sf}, {grdevices} to Imports

R/flow_fields.R

@@ -4,7 +4,7 @@
 #' See also https://www.williamrchase.com/post/flow-fields-12-months-of-art-september/
 #'
 #' @param n Number of lines. Default 10000.
-#' @param granualarity How fine to draw the grid. Default 1000.
+#' @param granularity How fine to draw the grid. Default 1000.
 #' @param x_freq Frequency of x simplex noise. Default 1.
 #' @param y_freq Frequency of y simplex noise. Default 1.
 #' @param alpha Transparency of lines. Default 1.
@@ -16,7 +16,7 @@
 #' @export
 
 flow_fields <- function(n = 10000,
-                        granualarity = 1000,
+                        granularity = 1000,
                         x_freq = 1,
                         y_freq = 1,
                         alpha = 1,

README.md

@@ -288,9 +288,9 @@ fading(n_layers=10, n_points=10, col_palette=rcartocolor::carto_pal(n = 7, "Suns
 The `flow_fields()` function produces generative art using particle traces. These functions are inspired by a blog post by [Will Chase](https://www.williamrchase.com/post/flow-fields-12-months-of-art-september/). 
 
 ``` r
-flow_fields(n = 10000, granualarity = 1000, x_freq = 1, y_freq = 1, alpha = 1, line_col = c("#edf8fb","#bfd3e6","#9ebcda","#8c96c6","#8c6bb1","#88419d","#6e016b"), bg_col = "lightgrey", s = 1234)
-flow_fields(n = 10000, granualarity = 1000, x_freq = 1, y_freq = 1, alpha = 0.3, line_col = "black", bg_col = "white", s = 1234)
-flow_fields(n = 10000, granualarity = 1000, x_freq = 3, y_freq = 0.2, alpha = 1, line_col = c("#edf8fb","#bfd3e6","#9ebcda","#8c96c6","#8c6bb1","#88419d","#6e016b"), bg_col = "lightgrey", s = 1234)
+flow_fields(n = 10000, granularity = 1000, x_freq = 1, y_freq = 1, alpha = 1, line_col = c("#edf8fb","#bfd3e6","#9ebcda","#8c96c6","#8c6bb1","#88419d","#6e016b"), bg_col = "lightgrey", s = 1234)
+flow_fields(n = 10000, granularity = 1000, x_freq = 1, y_freq = 1, alpha = 0.3, line_col = "black", bg_col = "white", s = 1234)
+flow_fields(n = 10000, granularity = 1000, x_freq = 3, y_freq = 0.2, alpha = 1, line_col = c("#edf8fb","#bfd3e6","#9ebcda","#8c96c6","#8c6bb1","#88419d","#6e016b"), bg_col = "lightgrey", s = 1234)
 ```
 <p align="center">
 <img src="https://github.com/nrennie/aRt/blob/main/man/figures/flow_fields1.jpeg?raw=true" width="30%">