From 98f982096f480b793cece8acc7cfd323b57f9b11 Mon Sep 17 00:00:00 2001 From: nrennie Date: Thu, 5 Jan 2023 20:14:21 +0000 Subject: [PATCH] fix: flow fields --- R/flow_fields.R | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/R/flow_fields.R b/R/flow_fields.R index d0e152b..609b8a3 100644 --- a/R/flow_fields.R +++ b/R/flow_fields.R @@ -24,8 +24,8 @@ flow_fields <- function(n = 10000, bg_col = "lightgrey", s = 1234) { set.seed(s) - grid <- ambient::long_grid(seq(1, 10, length.out = granualarity), - seq(1, 10, length.out = granualarity)) %>% + grid <- ambient::long_grid(seq(1, 10, length.out = granularity), + seq(1, 10, length.out = granularity)) %>% dplyr::mutate( x1 = .data$x + ambient::gen_simplex(x = .data$x, y = .data$y, frequency = x_freq), y1 = .data$y + ambient::gen_simplex(x = .data$x, y = .data$y, frequency = y_freq)