iframe-proxy | Sunbelt Computer Software

History

65 lines (59 loc) · 1.95 KB

Raw

import {group} from "d3";

import {maybeZ, take, valueof, maybeInput, lazyChannel} from "../mark.js";

import {basic} from "./basic.js";

export function mapX(m, options = {}) {

return map(Object.fromEntries(["x", "x1", "x2"]

.filter(key => options[key] != null)

.map(key => [key, m])), options);

}

export function mapY(m, options = {}) {

return map(Object.fromEntries(["y", "y1", "y2"]

.filter(key => options[key] != null)

.map(key => [key, m])), options);

}

export function map(outputs = {}, options = {}) {

const z = maybeZ(options);

const channels = Object.entries(outputs).map(([key, map]) => {

const input = maybeInput(key, options);

if (input == null) throw new Error(`missing channel: ${key}`);

const [output, setOutput] = lazyChannel(input);

return {key, input, output, setOutput, map: maybeMap(map)};

});

return {

...basic(options, (data, facets) => {

const Z = valueof(data, z);

const X = channels.map(({input}) => valueof(data, input));

const MX = channels.map(({setOutput}) => setOutput(new Array(data.length)));

for (const facet of facets) {

for (const I of Z ? group(facet, i => Z[i]).values() : [facet]) {

channels.forEach(({map}, i) => map.map(I, X[i], MX[i]));

}

return {data, facets};

}),

...Object.fromEntries(channels.map(({key, output}) => [key, output]))

};

}

function maybeMap(map) {

if (map && typeof map.map === "function") return map;

if (typeof map === "function") return mapFunction(map);

switch ((map + "").toLowerCase()) {

case "cumsum": return mapCumsum;

}

throw new Error("invalid map");

}

function mapFunction(f) {

return {

map(I, S, T) {

const M = f(take(S, I));

if (M.length !== I.length) throw new Error("mismatched length");

for (let i = 0, n = I.length; i < n; ++i) T[I[i]] = M[i];

}

};

}

const mapCumsum = {

map(I, S, T) {

let sum = 0;

for (const i of I) T[i] = sum += S[i];

}

};

Sunbelt Computer Software

PL/B Language Development and Support

Navigation Menu

Uh oh!

Sunbelt Computer Software

PL/B Language Development and Support

Uh oh!

FilesExpand file tree

map.js

Latest commit

History

map.js

File metadata and controls