N = 10; % input
t = .0001:.0001:2; % range of possible values: [.0001 .0002 ... 2]
r = t;
for k = 2:N
r = t.^r; % repeated exponentiation, element-wise
end
[~
, ind
] = min
(abs(r
-N
)); % index of entry of r that is closest to N
result = t(ind);
disp(result)
TiA9IDEwOyAlIGlucHV0CnQgPSAuMDAwMTouMDAwMToyOyAlIHJhbmdlIG9mIHBvc3NpYmxlIHZhbHVlczogWy4wMDAxIC4wMDAyIC4uLiAyXQpyID0gdDsKZm9yIGsgPSAyOk4KICAgIHIgPSB0Ll5yOyAlIHJlcGVhdGVkIGV4cG9uZW50aWF0aW9uLCBlbGVtZW50LXdpc2UKZW5kClt+LCBpbmRdID0gbWluKGFicyhyLU4pKTsgJSBpbmRleCBvZiBlbnRyeSBvZiByIHRoYXQgaXMgY2xvc2VzdCB0byBOCnJlc3VsdCA9IHQoaW5kKTsKZGlzcChyZXN1bHQp