Add this suggestion to a batch that can be applied as a single commit.
This suggestion is invalid because no changes were made to the code.
Suggestions cannot be applied while the pull request is closed.
Suggestions cannot be applied while viewing a subset of changes.
Only one suggestion per line can be applied in a batch.
Add this suggestion to a batch that can be applied as a single commit.
Applying suggestions on deleted lines is not supported.
You must change the existing code in this line in order to create a valid suggestion.
Outdated suggestions cannot be applied.
This suggestion has been applied or marked resolved.
Suggestions cannot be applied from pending reviews.
Suggestions cannot be applied on multi-line comments.
Suggestions cannot be applied while the pull request is queued to merge.
Suggestion cannot be applied right now. Please check back later.
In kernels.R, if maxvector = 800, numvectorss <- c(250, 500, 1000, min(c(maxvector, 2000)), maxvector) would return c(250, 500, 1000, 800, 800), but then 1000 > 800 and the code would throw a bug. e.g. numbervectorss can't be greater than maxvector.
A quick fix is to make the if condition thresholding at 1000, instead of 500