Post History
Japt, 11 bytes Could be 2 bytes shorter if not for a bug in Japt when trying to get the proper divisors of a number. õ üÈgXnXâ x Try it õ üÈgXnXâ x :Implicit input of integer U õ ...
Answer
#3: Post edited
by
Shaggy
·
2021-08-11T10:51:22Z (over 3 years ago)
- # [Japt](https://github.com/ETHproductions/japt), 11 [bytes](https://en.wikipedia.org/wiki/ISO/IEC_8859-1)
- õ üÈgXnXâ x
- [Try it](https://petershaggynoble.github.io/Japt-Interpreter/?v=1.4.6&code=9SD8yGdYbljiIHg&input=MTUKLVE)
- õ üÈgXnXâ x :Implicit input of integer U
- õ :Range [0,U]
- ü :Group & sort
- È :By passing each X through the following function
- g : Sign of difference of X and
- Xn : Subtract X from
- Xâ : All divisors of X
- x : Reduced by addition
- # [Japt](https://github.com/ETHproductions/japt), 11 [bytes](https://en.wikipedia.org/wiki/ISO/IEC_8859-1)
- Could be 2 bytes shorter if not for a bug in Japt when trying to get the proper divisors of a number.
- õ üÈgXnXâ x
- [Try it](https://petershaggynoble.github.io/Japt-Interpreter/?v=1.4.6&code=9SD8yGdYbljiIHg&input=MTUKLVE)
- õ üÈgXnXâ x :Implicit input of integer U
- õ :Range [0,U]
- ü :Group & sort
- È :By passing each X through the following function
- g : Sign of difference of X and
- Xn : Subtract X from
- Xâ : All divisors of X
- x : Reduced by addition
#2: Post edited
by
Shaggy
·
2021-06-22T16:45:30Z (over 3 years ago)
- # [Japt](https://github.com/ETHproductions/japt), 11 [bytes](https://en.wikipedia.org/wiki/ISO/IEC_8859-1)
+2 bytes to get around an annoying bug introduced in Japt v1.4.6 that broke proper divisors.- õ üÈgXnXâ x
[Try it](https://petershaggynoble.github.io/Japt-Interpreter/?v=1.4.6&code=9SD8yGdYbljiIHg&input=MTUKLVE)
- # [Japt](https://github.com/ETHproductions/japt), 11 [bytes](https://en.wikipedia.org/wiki/ISO/IEC_8859-1)
- õ üÈgXnXâ x
- [Try it](https://petershaggynoble.github.io/Japt-Interpreter/?v=1.4.6&code=9SD8yGdYbljiIHg&input=MTUKLVE)
- õ üÈgXnXâ x :Implicit input of integer U
- õ :Range [0,U]
- ü :Group & sort
- È :By passing each X through the following function
- g : Sign of difference of X and
- Xn : Subtract X from
- Xâ : All divisors of X
- x : Reduced by addition
#1: Initial revision
by
Shaggy
·
2021-06-21T16:26:30Z (over 3 years ago)
# [Japt](https://github.com/ETHproductions/japt), 11 [bytes](https://en.wikipedia.org/wiki/ISO/IEC_8859-1)
+2 bytes to get around an annoying bug introduced in Japt v1.4.6 that broke proper divisors.
õ üÈgXnXâ x
[Try it](https://petershaggynoble.github.io/Japt-Interpreter/?v=1.4.6&code=9SD8yGdYbljiIHg&input=MTUKLVE)