Skip to main content
deleted 1335 characters in body
Source Link
Jonah
  • 33.8k
  • 4
  • 40
  • 94

##parsed##explained

┌─────────────────────────────────────────────────────────────────────────────────────────────────────┬─┬──┐
│┌─────────────────────────────────────────────────────────────────────────────────────────────┬──┬──┐│@│i.│
││┌──┬─────┬──────────────────────────────────────────────────────────────────────────────────┐│@:│p:││(   │
│││[:│┌─┬─┐│┌────────┬──┬────────────────────────────────────────────────────────────────────┐││    ││   │
│││  ││+│/│││┌─┬─┬──┐│{                                             )@:p:@i.│┌─────┬──┬─────────────────────────────────────────────────────────┐│││  the first ││n primes, passed to...
│││  │└─┴─┘│││     -│@│@{:││  ││┌─┬─┐│{.│┌──┬──┬─────────────────────────────────────────────────┐││││    ││                ...                               take "nth prime" elements from the tail of...
│││       ││└─┴─┴──┘│  │││+│      +/││  ││[:│}:│┌──┬──────────────────┬─────────────────────────┐│││││    ││   │
│││       ││          ││└─┴─┘│  ││    ││[:│┌──────────────┬─┐│┌─┬─┬───────────────────┐││││││    ││               sum the first n primes and...
│││       ││          ││ {.      ││    ││  ││┌────────┬─┬─┐│/│││1│+│┌──┬──┬───────────┐│││││││    ││   │
│││       ││          ││       ││    ││ take │││┌──┬─┬─┐│,│]││that │││number of ││[:│ielements from.│┌─┬─┬─────┐││││││││..
    ││   │
│││       ││       [: }:  ││       ││    ││  ││││#:│@│[││  ││ │││  ││    ││1│+│┌─┬─┐│││││││││    ││              all but the last element of...   <----------------<
│││       ││          ││       ││    ││  │││└──┴─┴─┘│  ││ │││  ││    ││  ││+│ 1 + [: i. 1 + +/││││││││││    ││   │
│││   sum first n primes, ││add 1 (so we have enough     ││ |
      ││    ││  ││└────────┴─┴─┘│ │││  ││    ││  │└─┴─┘│││││││││    ││   │
│││       ││          ││       ││    ││  │└──────────────┴─┘││  ││    │└─┴─┴─────┘││││││││    ││for case n=1) -- make that many natural numbers   |
│││       ││          ││       ││   [: ││(#:@[ , ])/                  ││  │└──┴──┴───────────┘│││││││    ││   reduce them by turning into lists of binary       |
│││       ││          ││       ││    ││                    │└─┴─┴───────────────────┘││││││    ││                digits and catting, however the rightmost number  |
│││       ││          ││       ││    │└──┴──────────────────┴─────────────────────────┘│││││    ││   │
│││       ││          ││       │└──┴──┴─────────────────────────────────────────────────┘││││    ││     won't get reduced, hence the need for ------------^
│││([: +/      ││          │└─────┴──┴─────────────────────────────────────────────────────────┘│││    ││   │
│││       │└────────┴──┴────────────────────────────────────────────────────────────────────┘││    ││   │
││└──┴─────┴──────────────────────────────────────────────────────────────────────────────────┘│    ││   │
│└─────────────────────────────────────────────────────────────────────────────────────────────┴──┴──┘│   │
└─────────────────────────────────────────────────────────────────────────────────────────────────────┴─┴──┘               and sum those digits

##parsed

┌─────────────────────────────────────────────────────────────────────────────────────────────────────┬─┬──┐
│┌─────────────────────────────────────────────────────────────────────────────────────────────┬──┬──┐│@│i.│
││┌──┬─────┬──────────────────────────────────────────────────────────────────────────────────┐│@:│p:││   │
│││[:│┌─┬─┐│┌────────┬──┬────────────────────────────────────────────────────────────────────┐││    ││   │
│││  ││+│/│││┌─┬─┬──┐│{.│┌─────┬──┬─────────────────────────────────────────────────────────┐│││    ││   
│││  │└─┴─┘│││-│@│{:││  ││┌─┬─┐│{.│┌──┬──┬─────────────────────────────────────────────────┐││││    ││   
│││       ││└─┴─┴──┘│  │││+│/││  ││[:│}:│┌──┬──────────────────┬─────────────────────────┐│││││    ││   │
│││       ││          ││└─┴─┘│  ││    ││[:│┌──────────────┬─┐│┌─┬─┬───────────────────┐││││││    ││   
│││       ││          ││       ││    ││  ││┌────────┬─┬─┐│/│││1│+│┌──┬──┬───────────┐│││││││    ││   │
│││       ││          ││       ││    ││  │││┌──┬─┬─┐│,│]││ │││  ││[:│i.│┌─┬─┬─────┐││││││││    ││   │
│││       ││          ││       ││    ││  ││││#:│@│[││  ││ │││  ││    ││1│+│┌─┬─┐│││││││││    ││   
│││       ││          ││       ││    ││  │││└──┴─┴─┘│  ││ │││  ││    ││  ││+│/││││││││││    ││   │
│││       ││          ││       ││    ││  ││└────────┴─┴─┘│ │││  ││    ││  │└─┴─┘│││││││││    ││   │
│││       ││          ││       ││    ││  │└──────────────┴─┘││  ││    │└─┴─┴─────┘││││││││    ││   
│││       ││          ││       ││    ││                    ││  │└──┴──┴───────────┘│││││││    ││   
│││       ││          ││       ││    ││                    │└─┴─┴───────────────────┘││││││    ││   
│││       ││          ││       ││    │└──┴──────────────────┴─────────────────────────┘│││││    ││   │
│││       ││          ││       │└──┴──┴─────────────────────────────────────────────────┘││││    ││   
│││       ││          │└─────┴──┴─────────────────────────────────────────────────────────┘│││    ││   │
│││       │└────────┴──┴────────────────────────────────────────────────────────────────────┘││    ││   │
││└──┴─────┴──────────────────────────────────────────────────────────────────────────────────┘│    ││   │
│└─────────────────────────────────────────────────────────────────────────────────────────────┴──┴──┘│   │
└─────────────────────────────────────────────────────────────────────────────────────────────────────┴─┴──┘

##explained

(                                                         )@:p:@i.  the first n primes, passed to...
       -@{: {.                    ...                               take "nth prime" elements from the tail of...
               +/                                                   sum the first n primes and...
                  {.                                                take that number of elements from...
                     [: }:                                          all but the last element of...   <----------------<
                                          1 + [: i. 1 + +/          sum first n primes, add 1 (so we have enough      |
                                                                    for case n=1) -- make that many natural numbers   |
                           [: (#:@[ , ])/                           reduce them by turning into lists of binary       |
                                                                    digits and catting, however the rightmost number  |
                                                                    won't get reduced, hence the need for ------------^
([: +/                                                              and sum those digits
added 2540 characters in body
Source Link
Jonah
  • 33.8k
  • 4
  • 40
  • 94

#J, 5248 bytes

([:+/-@{:{.+/{.([:}:[:(#:@[,])/)@:(1+[:i.1++/))@:p:@i.

##ungolfed##parsed

([┌─────────────────────────────────────────────────────────────────────────────────────────────────────┬─┬──┐
│┌─────────────────────────────────────────────────────────────────────────────────────────────┬──┬──┐│@│i.│
││┌──┬─────┬──────────────────────────────────────────────────────────────────────────────────┐│@:│p:││ +│  │
│││[:│┌─┬─┐│┌────────┬──┬────────────────────────────────────────────────────────────────────┐││  │  ││ │  │
│││  ││+│/│││┌─┬─┬──┐│{.│┌─────┬──┬─────────────────────────────────────────────────────────┐│││  │  ││ │  │
│││  │└─┴─┘│││-@│@│{:││  ││┌─┬─┐│{.│┌──┬──┬─────────────────────────────────────────────────┐││││ + │  ││ │  │
│││  │     ││└─┴─┴──┘│  │││+│/││ {. ([││[: }:│┌──┬──────────────────┬─────────────────────────┐│││││ (# │  ││ │  │
│││  │     ││        │  ││└─┴─┘│  ││  │  ││[:@[│┌──────────────┬─┐│┌─┬─┬───────────────────┐││││││ , ])│  ││ │  │
│││  │     ││        │  ││     │  ││  │  ││  ││┌────────┬─┬─┐│/)@│││1│+│┌──┬──┬───────────┐│││││││  │  ││ │  │
│││  │     ││        │  ││     │  ││  │  ││  │││┌──┬─┬─┐│,│]││ │││ │ ││[:(1│i.│┌─┬─┬─────┐││││││││ + [│  ││ │  │
│││  │     ││        │  ││     │  ││  │  ││  ││││#:│@│[││ i. 1││ +│││ +│ ││  │  ││1│+│┌─┬─┐│││││││││  │  ││ │  │
│││  │     ││        │  ││     │  ││  │  ││  │││└──┴─┴─┘│ │ ││ │││ │ ││  │  ││ │ ││+│/))@:p:@i.││││││││││  │  ││ │  │
│││  │     ││        │  ││     │  ││  │  ││  ││└────────┴─┴─┘│ │││ │ ││  │  ││ │ │└─┴─┘│││││││││  │  ││ │  │
│││  │     ││        │  ││     │  ││  │  ││  │└──────────────┴─┘││ │ ││  │  │└─┴─┴─────┘││││││││  │  ││ │  │
│││  │     ││        │  ││     │  ││  │  ││  │                  ││ │ │└──┴──┴───────────┘│││││││  │  ││ │  │
│││  │     ││        │  ││     │  ││  │  ││  │                  │└─┴─┴───────────────────┘││││││  │  ││ │  │
│││  │     ││        │  ││     │  ││  │  │└──┴──────────────────┴─────────────────────────┘│││││  │  ││ │  │
│││  │     ││        │  ││     │  │└──┴──┴─────────────────────────────────────────────────┘││││  │  ││ │  │
│││  │     ││        │  │└─────┴──┴─────────────────────────────────────────────────────────┘│││  │  ││ │  │
│││  │     │└────────┴──┴────────────────────────────────────────────────────────────────────┘││  │  ││ │  │
││└──┴─────┴──────────────────────────────────────────────────────────────────────────────────┘│  │  ││ │  │
│└─────────────────────────────────────────────────────────────────────────────────────────────┴──┴──┘│ │  │
└─────────────────────────────────────────────────────────────────────────────────────────────────────┴─┴──┘

Try it online!Try it online!

#J, 52 bytes

([:+/-@{:{.+/{.([:}:(#:@[,])/)@:(1+[:i.1++/))@:p:@i.

##ungolfed

([: +/ -@{: {. +/ {. ([: }: (#:@[ , ])/)@:(1 + [: i. 1 + +/))@:p:@i.

Try it online!

#J, 48 bytes

([:+/-@{:{.+/{.[:}:[:(#:@[,])/1+[:i.1++/)@:p:@i.

##parsed

┌─────────────────────────────────────────────────────────────────────────────────────────────────────┬─┬──┐
│┌─────────────────────────────────────────────────────────────────────────────────────────────┬──┬──┐│@│i.│
││┌──┬─────┬──────────────────────────────────────────────────────────────────────────────────┐│@:│p:││ │  │
│││[:│┌─┬─┐│┌────────┬──┬────────────────────────────────────────────────────────────────────┐││  │  ││ │  │
│││  ││+│/│││┌─┬─┬──┐│{.│┌─────┬──┬─────────────────────────────────────────────────────────┐│││  │  ││ │  │
│││  │└─┴─┘│││-│@│{:││  ││┌─┬─┐│{.│┌──┬──┬─────────────────────────────────────────────────┐││││  │  ││ │  │
│││  │     ││└─┴─┴──┘│  │││+│/││  ││[:}:│┌──┬──────────────────┬─────────────────────────┐│││││  │  ││ │  │
│││  │     ││        │  ││└─┴─┘│  ││  │  ││[:│┌──────────────┬─┐│┌─┬─┬───────────────────┐││││││  │  ││ │  │
│││  │     ││        │  ││     │  ││  │  ││  ││┌────────┬─┬─┐│/│││1│+│┌──┬──┬───────────┐│││││││  │  ││ │  │
│││  │     ││        │  ││     │  ││  │  ││  │││┌──┬─┬─┐│,│]││ │││ │ ││[:│i.│┌─┬─┬─────┐││││││││  │  ││ │  │
│││  │     ││        │  ││     │  ││  │  ││  ││││#:│@│[││  ││ │││ │ ││  │  ││1│+│┌─┬─┐│││││││││  │  ││ │  │
│││  │     ││        │  ││     │  ││  │  ││  │││└──┴─┴─┘│ │ ││ │││ │ ││  │  ││ │ ││+│/││││││││││  │  ││ │  │
│││  │     ││        │  ││     │  ││  │  ││  ││└────────┴─┴─┘│ │││ │ ││  │  ││ │ │└─┴─┘│││││││││  │  ││ │  │
│││  │     ││        │  ││     │  ││  │  ││  │└──────────────┴─┘││ │ ││  │  │└─┴─┴─────┘││││││││  │  ││ │  │
│││  │     ││        │  ││     │  ││  │  ││  │                  ││ │ │└──┴──┴───────────┘│││││││  │  ││ │  │
│││  │     ││        │  ││     │  ││  │  ││  │                  │└─┴─┴───────────────────┘││││││  │  ││ │  │
│││  │     ││        │  ││     │  ││  │  │└──┴──────────────────┴─────────────────────────┘│││││  │  ││ │  │
│││  │     ││        │  ││     │  │└──┴──┴─────────────────────────────────────────────────┘││││  │  ││ │  │
│││  │     ││        │  │└─────┴──┴─────────────────────────────────────────────────────────┘│││  │  ││ │  │
│││  │     │└────────┴──┴────────────────────────────────────────────────────────────────────┘││  │  ││ │  │
││└──┴─────┴──────────────────────────────────────────────────────────────────────────────────┘│  │  ││ │  │
│└─────────────────────────────────────────────────────────────────────────────────────────────┴──┴──┘│ │  │
└─────────────────────────────────────────────────────────────────────────────────────────────────────┴─┴──┘

Try it online!

Source Link
Jonah
  • 33.8k
  • 4
  • 40
  • 94

#J, 52 bytes

([:+/-@{:{.+/{.([:}:(#:@[,])/)@:(1+[:i.1++/))@:p:@i.

##ungolfed

([: +/ -@{: {. +/ {. ([: }: (#:@[ , ])/)@:(1 + [: i. 1 + +/))@:p:@i.

Try it online!