Skip to main content
Commonmark migration
Source Link

##R, 39 31 bytes: x=T+T;x^(xxx+x)x-x^(xx)*x-x

R, 39 31 bytes:

###R, also 39 31 bytes: x=T+T;z=xx;x^(zx+x)x-x^zx-x

x=T+T;x^(x*x*x+x)*x-x^(x*x)*x-x

R, also 39 31 bytes:

x=T+T;z=x*x;x^(z*x+x)*x-x^z*x-x

Thanks Scrooble!

###More entertaining version: 46 bytes

More entertaining version: 46 bytes

z=pi;x=z*z;y=exp;j=z/y(z);floor(y(x)/(x-j-j))

Not especially efficient, but I had a lot of fun messing around with this. I'm sure there's a shorter way using just those two numbers

Long-form, subbing in the variables: floor(exp(pi*pi)/((pi*pi) - pi/exp(pi) - pi/exp(pi))

In real-person numbers: floor(19333.69 / (9.869604 - 0.1357605 - 0.1357605)) = floor(2014.328)

##R, 39 31 bytes: x=T+T;x^(xxx+x)x-x^(xx)*x-x

###R, also 39 31 bytes: x=T+T;z=xx;x^(zx+x)x-x^zx-x

Thanks Scrooble!

###More entertaining version: 46 bytes

z=pi;x=z*z;y=exp;j=z/y(z);floor(y(x)/(x-j-j))

Not especially efficient, but I had a lot of fun messing around with this. I'm sure there's a shorter way using just those two numbers

Long-form, subbing in the variables: floor(exp(pi*pi)/((pi*pi) - pi/exp(pi) - pi/exp(pi))

In real-person numbers: floor(19333.69 / (9.869604 - 0.1357605 - 0.1357605)) = floor(2014.328)

R, 39 31 bytes:

x=T+T;x^(x*x*x+x)*x-x^(x*x)*x-x

R, also 39 31 bytes:

x=T+T;z=x*x;x^(z*x+x)*x-x^z*x-x

Thanks Scrooble!

More entertaining version: 46 bytes

z=pi;x=z*z;y=exp;j=z/y(z);floor(y(x)/(x-j-j))

Not especially efficient, but I had a lot of fun messing around with this. I'm sure there's a shorter way using just those two numbers

Long-form, subbing in the variables: floor(exp(pi*pi)/((pi*pi) - pi/exp(pi) - pi/exp(pi))

In real-person numbers: floor(19333.69 / (9.869604 - 0.1357605 - 0.1357605)) = floor(2014.328)

added 38 characters in body
Source Link

##R, 3939 31 bytes: x=nchar('ii');x^x=T+T;x^(xxx+x)x-x^(xx)*x-x

###R, also 3939 31 bytes: x=nchar('ii');z=xx=T+T;z=xx;x^(zx+x)x-x^zx-x

Thanks Scrooble!

###More entertaining version: 46 bytes

z=pi;x=z*z;y=exp;j=z/y(z);floor(y(x)/(x-j-j))

Not especially efficient, but I had a lot of fun messing around with this. I'm sure there's a shorter way using just those two numbers

Long-form, subbing in the variables: floor(exp(pi*pi)/((pi*pi) - pi/exp(pi) - pi/exp(pi))

In real-person numbers: floor(19333.69 / (9.869604 - 0.1357605 - 0.1357605)) = floor(2014.328)

##R, 39 bytes: x=nchar('ii');x^(xxx+x)x-x^(xx)*x-x

###R, also 39 bytes: x=nchar('ii');z=xx;x^(zx+x)x-x^zx-x

###More entertaining version: 46 bytes

z=pi;x=z*z;y=exp;j=z/y(z);floor(y(x)/(x-j-j))

Not especially efficient, but I had a lot of fun messing around with this. I'm sure there's a shorter way using just those two numbers

Long-form, subbing in the variables: floor(exp(pi*pi)/((pi*pi) - pi/exp(pi) - pi/exp(pi))

In real-person numbers: floor(19333.69 / (9.869604 - 0.1357605 - 0.1357605)) = floor(2014.328)

##R, 39 31 bytes: x=T+T;x^(xxx+x)x-x^(xx)*x-x

###R, also 39 31 bytes: x=T+T;z=xx;x^(zx+x)x-x^zx-x

Thanks Scrooble!

###More entertaining version: 46 bytes

z=pi;x=z*z;y=exp;j=z/y(z);floor(y(x)/(x-j-j))

Not especially efficient, but I had a lot of fun messing around with this. I'm sure there's a shorter way using just those two numbers

Long-form, subbing in the variables: floor(exp(pi*pi)/((pi*pi) - pi/exp(pi) - pi/exp(pi))

In real-person numbers: floor(19333.69 / (9.869604 - 0.1357605 - 0.1357605)) = floor(2014.328)

added 4 characters in body
Source Link
Steadybox
  • 16.5k
  • 5
  • 41
  • 84

##R, 39 bytes: x=nchar('ii');x^(x*x*x+x)*x-x^(x*x)*x-xx=nchar('ii');x^(xxx+x)x-x^(xx)*x-x

###R, also 39 bytes: x=nchar('ii');z=x*x;x^(z*x+x)*x-x^z*x-xx=nchar('ii');z=xx;x^(zx+x)x-x^zx-x

###More entertaining version: 46 bytes

z=pi;x=z*z;y=exp;j=z/y(z);floor(y(x)/(x-j-j))

z=pi;x=z*z;y=exp;j=z/y(z);floor(y(x)/(x-j-j))

Not especially efficient, but I had a lot of fun messing around with this. I'm sure there's a shorter way using just those two numbers

Long-form, subbing in the variables: floor(exp(pi*pi)/((pi*pi) - pi/exp(pi) - pi/exp(pi))

In real-person numbers: floor(19333.69 / (9.869604 - 0.1357605 - 0.1357605)) = floor(2014.328)

##R, 39 bytes: x=nchar('ii');x^(x*x*x+x)*x-x^(x*x)*x-x

###R, also 39 bytes: x=nchar('ii');z=x*x;x^(z*x+x)*x-x^z*x-x

###More entertaining version: 46 bytes

z=pi;x=z*z;y=exp;j=z/y(z);floor(y(x)/(x-j-j))

Not especially efficient, but I had a lot of fun messing around with this. I'm sure there's a shorter way using just those two numbers

Long-form, subbing in the variables: floor(exp(pi*pi)/((pi*pi) - pi/exp(pi) - pi/exp(pi))

In real-person numbers: floor(19333.69 / (9.869604 - 0.1357605 - 0.1357605)) = floor(2014.328)

##R, 39 bytes: x=nchar('ii');x^(xxx+x)x-x^(xx)*x-x

###R, also 39 bytes: x=nchar('ii');z=xx;x^(zx+x)x-x^zx-x

###More entertaining version: 46 bytes

z=pi;x=z*z;y=exp;j=z/y(z);floor(y(x)/(x-j-j))

Not especially efficient, but I had a lot of fun messing around with this. I'm sure there's a shorter way using just those two numbers

Long-form, subbing in the variables: floor(exp(pi*pi)/((pi*pi) - pi/exp(pi) - pi/exp(pi))

In real-person numbers: floor(19333.69 / (9.869604 - 0.1357605 - 0.1357605)) = floor(2014.328)

added 155 characters in body
Source Link
Loading
Source Link
Loading