Interactive data visualization
Public
Edited
Sep 8, 2023
// compose1.f([args1, length1])(1, 2, 3)
id = x => x
list = funcs => x => funcs.map(func => func(x))
assertArray = x => {
if (!Array.isArray(x)) throw new Error('Not an array');
return x;
}
compose = funcs => x => {
let res = x;
for (const func of assertArray(funcs)) {
res = func(res);
}
return res;
}
length = compose([assertArray, x => x.length]);
$ = fn => (...args) => fn(args)
object = funcs => x => Object.fromEntries(funcs.map(([key, func]) => [key, func(x)]))
call = head => arg => x => head(x)(arg(x))
callConst = head => arg => x => head(arg(x))
cnst = val => x => val
embed = object([['$', id]])
getter = key => x => x[key]
assign3 = variable => val => ctx => {
ctx[variable] = val(ctx);
}
ops = funcs => x => {
let res;
for (const func of funcs) {
res = func(x);
}
return res;
}
ops([
assign3('x')(cnst(1)),
getter('x'),
])({})
plusTwo = x => y => x + y
takeArray = fun => x => {
let res = fun;
for (const arg of x) {
res = res(arg);
}
return res;
}
reduce = fun => init => arr => {
let res = init;
for (const x of arr) {
res = fun(res)(x);
}
return res;
}
ops([
assign3('x')(takeArray(callConst)([takeArray(plusTwo), cnst([3, 15])])),
getter('x'),
])({})
assign4 = name => value => ctx => ({...ctx, [name]: value(ctx)})
embedArgs = x => ({$: x})
makeFun4 = stmts => compose([embedArgs, ...stmts, getter('return')])
fun4 = makeFun4([
assign4('b')(cnst(10)),
assign4('return')(callConst(takeArray(plusTwo))(list([getter('$'), getter('b')]))),
])
fun4(42)
stored6 = () => {
const res = ctx => {
return ctx(res);
}
return res;
}
mkCtx6 = (parent, ...initDefs) => {
const defs = new Map(parent && parent.defs);
const cache = new Map();
const res = fun => {
if (!cache.has(fun)) {
let resFun = fun;
while (defs.has(resFun)) {
resFun = defs.get(resFun);
}
console.log(resFun);
cache.set(fun, resFun(res));
}
return cache.get(fun);
};
res.def = (fun1, fun2) => {
defs.set(fun1, fun2);
return res;
}
res.cache = cache;
res.defs = defs;
for (const def of (initDefs || [])) {
res.def(def[0], def[1]);
}
return res;
}
seven = cnst(7)
a = stored6()
b = stored6()
aPlusB = callConst(takeArray(plusTwo))(list([a, b]))
arg6 = stored6()
return6 = stored6()
ctx61 = mkCtx6(
null,
[a, arg6],
[b, seven],
[return6, aPlusB],
)
makeFun6 = parentCtx => x => return6(mkCtx6(parentCtx, [arg6, cnst(x)]))
fun6 = makeFun6(ctx61)
fun6(11)
Purpose-built for displays of data
Observable is your go-to platform for exploring data and creating expressive data visualizations. Use reactive JavaScript notebooks for prototyping and a collaborative canvas for visual data exploration and dashboard creation.
