Successive prime differences: Difference between revisions

Content added Content deleted

Inline

@@ Line 1,245: / Line 1,245: @@
    sequence_index=: [: I. E.
-   end_groups=: PRIMES {~  ({. , {:)@:] +/ i.@:>:@:#@:[
+   end_groups=: PRIMES {~  ({. , {:)@] +/ 0,#\@[
    HEAD=: <;._2 'group;tally;end occurrences;'
-   HEAD , INTERVALS (([ ([ ; #@] ; end_groups) sequence_index)~ >)"1 0~ SUCCESSIVE_DIFFERENCES
+   HEAD ,> INTERVALS ([ ([ ; #@] ; end_groups) sequence_index)&.> <SUCCESSIVE_DIFFERENCES
 ┌─────┬─────┬───────────────────────────┐
 │group│tally│end occurrences            │