@jbrowse/plugin-wiggle 3.1.0 → 3.3.0

package/esm/MultiLinearWiggleDisplay/components/ClusterDialog.js

@@ -1,109 +0,0 @@
-import { jsx as _jsx, jsxs as _jsxs } from "react/jsx-runtime";
-import { useEffect, useState } from 'react';
-import { Dialog, ErrorMessage, LoadingEllipses } from '@jbrowse/core/ui';
-import { getContainingView, getSession, isAbortException, } from '@jbrowse/core/util';
-import { getRpcSessionId } from '@jbrowse/core/util/tracks';
-import { Button, Checkbox, DialogActions, DialogContent, FormControlLabel, TextField, Typography, } from '@mui/material';
-import copy from 'copy-to-clipboard';
-import { saveAs } from 'file-saver';
-import { isAlive } from 'mobx-state-tree';
-import { makeStyles } from 'tss-react/mui';
-const useStyles = makeStyles()(theme => ({
-    textAreaFont: {
-        fontFamily: 'Courier New',
-    },
-    mgap: {
-        display: 'flex',
-        flexDirection: 'column',
-        gap: theme.spacing(4),
-    },
-}));
-export default function ClusterDialog({ model, handleClose, }) {
-    const { classes } = useStyles();
-    const [results, setResults] = useState();
-    const [error, setError] = useState();
-    const [paste, setPaste] = useState('');
-    const [useCompleteMethod, setUseCompleteMethod] = useState(false);
-    useEffect(() => {
-        ;
-        (async () => {
-            try {
-                setError(undefined);
-                const view = getContainingView(model);
-                if (!view.initialized) {
-                    return;
-                }
-                const { rpcManager } = getSession(model);
-                const { sources, minorAlleleFrequencyFilter, adapterConfig } = model;
-                const sessionId = getRpcSessionId(model);
-                const { bpPerPx } = view;
-                const ret = (await rpcManager.call(sessionId, 'MultiWiggleGetScoreMatrix', {
-                    regions: view.dynamicBlocks.contentBlocks,
-                    sources,
-                    minorAlleleFrequencyFilter,
-                    sessionId,
-                    adapterConfig,
-                    bpPerPx,
-                }));
-                const entries = Object.values(ret);
-                const keys = Object.keys(ret);
-                const clusterMethod = useCompleteMethod ? 'complete' : 'single';
-                const text = `try(library(fastcluster), silent=TRUE)
-inputMatrix<-matrix(c(${entries.map(val => val.scores.join(',')).join(',\n')}
-),nrow=${entries.length},byrow=TRUE)
-rownames(inputMatrix)<-c(${keys.map(key => `'${key}'`).join(',')})
-resultClusters<-hclust(dist(inputMatrix), method='${clusterMethod}')
-cat(resultClusters$order,sep='\\n')`;
-                setResults(text);
-            }
-            catch (e) {
-                if (!isAbortException(e) && isAlive(model)) {
-                    console.error(e);
-                    setError(e);
-                }
-            }
-        })();
-    }, [model, useCompleteMethod]);
-    return (_jsxs(Dialog, { open: true, title: "Cluster by score", onClose: handleClose, children: [_jsx(DialogContent, { children: _jsxs("div", { className: classes.mgap, children: [_jsx(Typography, { children: "This page will produce an R script that will perform hierarchical clustering on the visible score data using `hclust`." }), _jsx(Typography, { children: "You can then paste the results in this form to specify the row ordering." }), results ? (_jsx("div", { children: _jsxs("div", { children: ["Step 1:", ' ', _jsx(Button, { variant: "contained", onClick: () => {
-                                            saveAs(new Blob([results || ''], {
-                                                type: 'text/plain;charset=utf-8',
-                                            }), 'cluster.R');
-                                        }, children: "Download Rscript" }), ' ', "or", ' ', _jsx(Button, { variant: "contained", onClick: () => {
-                                            copy(results || '');
-                                        }, children: "Copy Rscript to clipboard" }), _jsx(FormControlLabel, { control: _jsx(Checkbox, { checked: useCompleteMethod, onChange: e => {
-                                                setUseCompleteMethod(e.target.checked);
-                                            } }), label: "Use 'complete' linkage method instead of 'single'" }), _jsx("div", { children: _jsx(TextField, { multiline: true, fullWidth: true, variant: "outlined", placeholder: "Step 2. Paste results from Rscript here (sequence of numbers, one per line, specifying the new ordering)", rows: 10, value: paste, onChange: event => {
-                                                setPaste(event.target.value);
-                                            }, slotProps: {
-                                                input: {
-                                                    classes: {
-                                                        input: classes.textAreaFont,
-                                                    },
-                                                },
-                                            } }) })] }) })) : (_jsx(LoadingEllipses, { variant: "h6", title: "Generating score matrix" })), error ? _jsx(ErrorMessage, { error: error }) : null] }) }), _jsxs(DialogActions, { children: [_jsx(Button, { disabled: !results, variant: "contained", onClick: () => {
-                            const { sources } = model;
-                            if (sources) {
-                                try {
-                                    model.setLayout(paste
-                                        .split('\n')
-                                        .map(t => t.trim())
-                                        .filter(f => !!f)
-                                        .map(r => +r)
-                                        .map(idx => {
-                                        const ret = sources[idx - 1];
-                                        if (!ret) {
-                                            throw new Error(`out of bounds at ${idx}`);
-                                        }
-                                        return ret;
-                                    }));
-                                }
-                                catch (e) {
-                                    console.error(e);
-                                    setError(e);
-                                }
-                            }
-                            handleClose();
-                        }, children: "Apply clustering" }), _jsx(Button, { variant: "contained", color: "secondary", onClick: () => {
-                            handleClose();
-                        }, children: "Cancel" })] })] }));
-}