In [1]:
import os
import sys
sys.path.append(os.path.abspath("/users/amtseng/tfmodisco/src/"))
from tfmodisco.run_tfmodisco import import_shap_scores, import_tfmodisco_results
from motif.read_motifs import pfm_info_content, pfm_to_pwm, trim_motif_by_ic
from motif.match_motifs import match_motifs_to_database
from util import figure_to_vdom_image
import plot.viz_sequence as viz_sequence
import numpy as np
import h5py
import matplotlib.pyplot as plt
import vdom.helpers as vdomh
from IPython.display import display

Define constants and paths

In [2]:
# Define parameters/fetch arguments
tf_name = os.environ["TFM_TF_NAME"]
shap_scores_path = os.environ["TFM_SHAP_PATH"]
tfm_results_path = os.environ["TFM_TFM_PATH"]
hyp_score_key = os.environ["TFM_HYP_SCORE_KEY"]
if "TFM_MOTIF_CACHE" in os.environ:
    tfm_motifs_cache_dir = os.environ["TFM_MOTIF_CACHE"]
else:
    tfm_motifs_cache_dir = None

print("TF name: %s" % tf_name)
print("DeepSHAP scores path: %s" % shap_scores_path)
print("TF-MoDISco results path: %s" % tfm_results_path)
print("Importance score key: %s" % hyp_score_key)
print("Saved TF-MoDISco-derived motifs cache: %s" % tfm_motifs_cache_dir)
TF name: E2F6
DeepSHAP scores path: /users/amtseng/tfmodisco/results/importance_scores/multitask_profile/E2F6_multitask_profile_fold3/E2F6_multitask_profile_fold3_imp_scores.h5
TF-MoDISco results path: /users/amtseng/tfmodisco/results/tfmodisco/multitask_profile/E2F6_multitask_profile_fold3/E2F6_multitask_profile_fold3_count_tfm.h5
Importance score key: count_hyp_scores
Saved TF-MoDISco-derived motifs cache: /users/amtseng/tfmodisco/results/reports/tfmodisco_results//cache/multitask_profile/E2F6_multitask_profile_fold3/E2F6_multitask_profile_fold3_count
In [3]:
# Define paths and constants
input_length = 2114
shap_score_center_size = 400
In [4]:
if tfm_motifs_cache_dir:
    os.makedirs(tfm_motifs_cache_dir, exist_ok=True)

Import SHAP scores and TF-MoDISco results

In [5]:
# Import SHAP coordinates and one-hot sequences
hyp_scores, _, one_hot_seqs, shap_coords = import_shap_scores(shap_scores_path, hyp_score_key, center_cut_size=shap_score_center_size)
# This cuts the sequences/scores off just as how TF-MoDISco saw them, but the coordinates are uncut
Importing SHAP scores: 100%|██████████| 52/52 [00:31<00:00,  1.63it/s]
In [6]:
# Import the TF-MoDISco results object
tfm_obj = import_tfmodisco_results(tfm_results_path, hyp_scores, one_hot_seqs, shap_score_center_size)

Plot some SHAP score tracks

Plot the central region of some randomly selected actual importance scores

In [7]:
plot_slice = slice(int(shap_score_center_size / 4), int(3 * shap_score_center_size / 4))
for index in np.random.choice(hyp_scores.shape[0], size=5, replace=False):
    viz_sequence.plot_weights((hyp_scores[index] * one_hot_seqs[index])[plot_slice], subticks_frequency=100)

Plot TF-MoDISco results

Plot all motifs by metacluster

In [8]:
motif_pfms, motif_hcwms, motif_cwms = [], [], []  # Save the trimmed PFMs, hCWMs, and CWMs
motif_pfms_short = []  # PFMs that are even more trimmed (for TOMTOM)
num_seqlets = []  # Number of seqlets for each motif
motif_seqlets = []  # Save seqlets of each motif
metaclusters = tfm_obj.metacluster_idx_to_submetacluster_results
num_metaclusters = len(metaclusters.keys())
if tfm_motifs_cache_dir:
    motif_hdf5 = h5py.File(os.path.join(tfm_motifs_cache_dir, "all_motifs.h5"), "w")
for metacluster_i, metacluster_key in enumerate(metaclusters.keys()):
    metacluster = metaclusters[metacluster_key]
    display(vdomh.h3("Metacluster %d/%d" % (metacluster_i + 1, num_metaclusters)))
    patterns = metacluster.seqlets_to_patterns_result.patterns
    if not patterns:
        break
    motif_pfms.append([])
    motif_hcwms.append([])
    motif_cwms.append([])
    motif_pfms_short.append([])
    num_seqlets.append([])
    motif_seqlets.append([])
    num_patterns = len(patterns)
    for pattern_i, pattern in enumerate(patterns):
        seqlets = pattern.seqlets
        display(vdomh.h4("Pattern %d/%d" % (pattern_i + 1, num_patterns)))
        display(vdomh.p("%d seqlets" % len(seqlets)))
        
        pfm = pattern["sequence"].fwd
        hcwm = pattern["task0_hypothetical_contribs"].fwd
        cwm = pattern["task0_contrib_scores"].fwd
        
        pfm_fig = viz_sequence.plot_weights(pfm, subticks_frequency=10, return_fig=True)
        hcwm_fig = viz_sequence.plot_weights(hcwm, subticks_frequency=10, return_fig=True)
        cwm_fig = viz_sequence.plot_weights(cwm, subticks_frequency=10, return_fig=True)
        pfm_fig.tight_layout()
        hcwm_fig.tight_layout()
        cwm_fig.tight_layout()
        
        motif_table = vdomh.table(
            vdomh.tr(
                vdomh.td("Sequence (PFM)"),
                vdomh.td(figure_to_vdom_image(pfm_fig))
            ),
            vdomh.tr(
                vdomh.td("Hypothetical contributions (hCWM)"),
                vdomh.td(figure_to_vdom_image(hcwm_fig))
            ),
            vdomh.tr(
                vdomh.td("Actual contributions (CWM)"),
                vdomh.td(figure_to_vdom_image(cwm_fig))
            )
        )
        display(motif_table)
        plt.close("all")  # Remove all standing figures
        
        # Trim motif based on information content
        short_trimmed_pfm = trim_motif_by_ic(pfm, pfm)
        motif_pfms_short[-1].append(short_trimmed_pfm)
        
        # Expand trimming to +/- 4bp on either side
        trimmed_pfm = trim_motif_by_ic(pfm, pfm, pad=4)
        trimmed_hcwm = trim_motif_by_ic(pfm, hcwm, pad=4)
        trimmed_cwm = trim_motif_by_ic(pfm, cwm, pad=4)
        
        motif_pfms[-1].append(trimmed_pfm)
        motif_hcwms[-1].append(trimmed_hcwm)
        motif_cwms[-1].append(trimmed_cwm)
        
        num_seqlets[-1].append(len(seqlets))
        
        if tfm_motifs_cache_dir:
            # Save results and figures
            motif_id = "%d_%d" % (metacluster_i, pattern_i)
            pfm_fig.savefig(os.path.join(tfm_motifs_cache_dir, motif_id + "_pfm_full.png"))
            hcwm_fig.savefig(os.path.join(tfm_motifs_cache_dir, motif_id + "_hcwm_full.png"))
            cwm_fig.savefig(os.path.join(tfm_motifs_cache_dir, motif_id + "_cwm_full.png"))
            motif_dset = motif_hdf5.create_group(motif_id)
            motif_dset.create_dataset("pfm_full", data=pfm, compression="gzip")
            motif_dset.create_dataset("hcwm_full", data=hcwm, compression="gzip")
            motif_dset.create_dataset("cwm_full", data=cwm, compression="gzip")
            motif_dset.create_dataset("pfm_trimmed", data=trimmed_pfm, compression="gzip")
            motif_dset.create_dataset("hcwm_trimmed", data=trimmed_hcwm, compression="gzip")
            motif_dset.create_dataset("cwm_trimmed", data=trimmed_cwm, compression="gzip")
            motif_dset.create_dataset("pfm_short_trimmed", data=short_trimmed_pfm, compression="gzip")

Metacluster 1/1

Pattern 1/9

5992 seqlets

Sequence (PFM)
Hypothetical contributions (hCWM)
Actual contributions (CWM)

Pattern 2/9

4174 seqlets

Sequence (PFM)
Hypothetical contributions (hCWM)
Actual contributions (CWM)

Pattern 3/9

2635 seqlets

Sequence (PFM)
Hypothetical contributions (hCWM)
Actual contributions (CWM)

Pattern 4/9

1008 seqlets

Sequence (PFM)
Hypothetical contributions (hCWM)
Actual contributions (CWM)

Pattern 5/9

850 seqlets

Sequence (PFM)
Hypothetical contributions (hCWM)
Actual contributions (CWM)

Pattern 6/9

77 seqlets

Sequence (PFM)
Hypothetical contributions (hCWM)
Actual contributions (CWM)

Pattern 7/9

41 seqlets

Sequence (PFM)
Hypothetical contributions (hCWM)
Actual contributions (CWM)

Pattern 8/9

34 seqlets

Sequence (PFM)
Hypothetical contributions (hCWM)
Actual contributions (CWM)

Pattern 9/9

33 seqlets

Sequence (PFM)
Hypothetical contributions (hCWM)
Actual contributions (CWM)

Summary of motifs

Motifs are trimmed based on information content, and presented in descending order by number of supporting seqlets. The motifs are separated by metacluster. The motifs are presented as hCWMs. The forward orientation is defined as the orientation that is richer in purines.

In [9]:
colgroup = vdomh.colgroup(
    vdomh.col(style={"width": "5%"}),
    vdomh.col(style={"width": "5%"}),
    vdomh.col(style={"width": "45%"}),
    vdomh.col(style={"width": "45%"})
)
header = vdomh.thead(
    vdomh.tr(
        vdomh.th("#", style={"text-align": "center"}),
        vdomh.th("Seqlets", style={"text-align": "center"}),
        vdomh.th("Forward", style={"text-align": "center"}),
        vdomh.th("Reverse", style={"text-align": "center"})
    )
)

for i in range(len(motif_hcwms)):
    display(vdomh.h3("Metacluster %d/%d" % (i + 1, num_metaclusters)))
    body = []
    for j in range(len(motif_hcwms[i])):
        motif = motif_hcwms[i][j]
        if np.sum(motif[:, [0, 2]]) > 0.5 * np.sum(motif):
            # Forward is purine-rich, reverse-complement is pyrimidine-rich
            f, rc = motif, np.flip(motif, axis=(0, 1))
        else:
            f, rc = np.flip(motif, axis=(0, 1)), motif
            
        f_fig = viz_sequence.plot_weights(f, figsize=(20, 4), return_fig=True)
        f_fig.tight_layout()
        rc_fig = viz_sequence.plot_weights(rc, figsize=(20, 4), return_fig=True)
        rc_fig.tight_layout()
        
        if tfm_motifs_cache_dir:
            # Save results and figures
            motif_id = "%d_%d" % (i, j)
            f_fig.savefig(os.path.join(tfm_motifs_cache_dir, motif_id + "_hcwm_trimmed_fwd.png"))
            rc_fig.savefig(os.path.join(tfm_motifs_cache_dir, motif_id + "_hcwm_trimmed_rev.png"))

        body.append(
            vdomh.tr(
                vdomh.td(str(j + 1)),
                vdomh.td(str(num_seqlets[i][j])),
                vdomh.td(figure_to_vdom_image(f_fig)),
                vdomh.td(figure_to_vdom_image(rc_fig))
            )
        )
    display(vdomh.table(colgroup, header, vdomh.tbody(*body)))
    plt.close("all")

Metacluster 1/1

#SeqletsForwardReverse
15992
24174
32635
41008
5850
677
741
834
933

Top TOMTOM matches for each motif

Here, the TF-MoDISco motifs are plotted as hCWMs, but the TOMTOM matches are shown as PWMs.

In [10]:
num_matches_to_keep = 10
num_matches_to_show = 5

header = vdomh.thead(
    vdomh.tr(
        vdomh.th("Motif ID", style={"text-align": "center"}),
        vdomh.th("q-val", style={"text-align": "center"}),
        vdomh.th("PWM", style={"text-align": "center"})
    )
)

for i in range(len(motif_pfms)):
    display(vdomh.h3("Metacluster %d/%d" % (i + 1, num_metaclusters)))
    
    # Compute TOMTOM matches for all motifs in the metacluster at once
    out_dir = os.path.join(tfm_motifs_cache_dir, "tomtom", "metacluster_%d" % i) if tfm_motifs_cache_dir else None
    tomtom_matches = match_motifs_to_database(motif_pfms_short[i], top_k=num_matches_to_keep, temp_dir=out_dir)
    
    for j in range(len(motif_pfms[i])):
        display(vdomh.h4("Motif %d/%d" % (j + 1, len(motif_pfms[i]))))
        viz_sequence.plot_weights(motif_hcwms[i][j])
    
        body = []
        for k, (match_name, match_pfm, match_qval) in enumerate(tomtom_matches[j]):
            fig = viz_sequence.plot_weights(pfm_to_pwm(match_pfm), return_fig=True)
            fig.tight_layout()
            if k < num_matches_to_show:
                body.append(
                    vdomh.tr(
                        vdomh.td(match_name),
                        vdomh.td(str(match_qval)),
                        vdomh.td(figure_to_vdom_image(fig))
                    )
                )
                if tfm_motifs_cache_dir:
                    # Save results and figures
                    motif_id = "%d_%d" % (i, j)
                    fig.savefig(os.path.join(out_dir, motif_id + ("_hit-%d.png" % (k + 1))))
            else:
                body.append(
                    vdomh.tr(
                        vdomh.td(match_name),
                        vdomh.td(str(match_qval)),
                        vdomh.td("Not shown")
                    )
                )
        if not body:
            display(vdomh.p("No TOMTOM matches passing threshold"))
        else:
            display(vdomh.table(header, vdomh.tbody(*body)))
        plt.close("all")

Metacluster 1/1

Motif 1/9

Motif IDq-valPWM
MA0059.1_MAX::MYC0.000278459
MYCN_HUMAN.H11MO.0.A0.00089543
MA0147.3_MYC0.00089543
MAX_HUMAN.H11MO.0.A0.00089543
MXI1_HUMAN.H11MO.1.A0.00089543
MXI1_HUMAN.H11MO.0.A0.0009299810000000001Not shown
MA0058.3_MAX0.00149363Not shown
MYC_HUMAN.H11MO.0.A0.00185885Not shown
MA0104.4_MYCN0.0022898000000000003Not shown
MA0004.1_Arnt0.00434639Not shown

Motif 2/9

Motif IDq-valPWM
MA0471.2_E2F63.96956e-06
E2F1_HUMAN.H11MO.0.A3.96956e-06
E2F3_HUMAN.H11MO.0.A3.96956e-06
E2F6_HUMAN.H11MO.0.A2.9662600000000003e-05
TFDP1_HUMAN.H11MO.0.C2.9662600000000003e-05
E2F4_HUMAN.H11MO.0.A4.36829e-05Not shown
E2F7_HUMAN.H11MO.0.B0.00020261700000000002Not shown
MA1122.1_TFDP10.0010967000000000001Not shown
MA0865.1_E2F80.0139154Not shown
E2F4_HUMAN.H11MO.1.A0.0150166Not shown

Motif 3/9

Motif IDq-valPWM
MAX_HUMAN.H11MO.0.A0.197581
MA0058.3_MAX0.197581
MA0147.3_MYC0.197581
MXI1_HUMAN.H11MO.1.A0.197581
MA0632.2_TCFL50.197581
MA0825.1_MNT0.197581Not shown
MYC_HUMAN.H11MO.0.A0.197581Not shown
MA1099.2_HES10.20982199999999998Not shown
MA0059.1_MAX::MYC0.20982199999999998Not shown
MXI1_HUMAN.H11MO.0.A0.20987199999999998Not shown

Motif 4/9

Motif IDq-valPWM
CTCFL_HUMAN.H11MO.0.A9.29212e-09
CTCF_HUMAN.H11MO.0.A9.29212e-09
MA0139.1_CTCF2.10554e-07
MA1102.2_CTCFL1.50404e-05
PLAL1_HUMAN.H11MO.0.D0.141039
KLF8_HUMAN.H11MO.0.C0.141039Not shown
SNAI1_HUMAN.H11MO.0.C0.18146500000000002Not shown
MA0155.1_INSM10.203153Not shown
MA1628.1_Zic1::Zic20.27184200000000003Not shown
ZIC3_HUMAN.H11MO.0.B0.27184200000000003Not shown

Motif 5/9

No TOMTOM matches passing threshold

Motif 6/9

Motif IDq-valPWM
MA1565.1_TBX180.000126723
MA0803.1_TBX150.00013521600000000001
MA0805.1_TBX10.00013521600000000001
MA1566.1_TBX30.000412252
MA0801.1_MGA0.000412252
MA0806.1_TBX40.000412252Not shown
MA1567.1_TBX60.000412252Not shown
MA0807.1_TBX50.000558931Not shown
MA0689.1_TBX200.000558931Not shown
TBX5_HUMAN.H11MO.0.D0.0008517080000000001Not shown

Motif 7/9

Motif IDq-valPWM
USF2_HUMAN.H11MO.0.A0.027201799999999998
SP2_HUMAN.H11MO.0.A0.027201799999999998
MA0147.3_MYC0.027201799999999998
MXI1_HUMAN.H11MO.0.A0.027511900000000002
RFX1_HUMAN.H11MO.0.B0.027511900000000002
SP1_HUMAN.H11MO.0.A0.0425141Not shown
MA1650.1_ZBTB140.055538800000000006Not shown
MA0632.2_TCFL50.055538800000000006Not shown
MAX_HUMAN.H11MO.0.A0.0650042Not shown
MA1099.2_HES10.0650042Not shown

Motif 8/9

Motif IDq-valPWM
NFYB_HUMAN.H11MO.0.A1.72122e-05
NFYC_HUMAN.H11MO.0.A4.34472e-05
NFYA_HUMAN.H11MO.0.A0.000100749
CEBPZ_HUMAN.H11MO.0.D0.000961045
SP2_HUMAN.H11MO.0.A0.00338026
MA0060.3_NFYA0.00338026Not shown
MA1644.1_NFYC0.0050155Not shown
FOXI1_HUMAN.H11MO.0.B0.00552696Not shown
MA0502.2_NFYB0.00687979Not shown
SP3_HUMAN.H11MO.0.B0.00687979Not shown

Motif 9/9

Motif IDq-valPWM
SP3_HUMAN.H11MO.0.B0.018224599999999997
SP1_HUMAN.H11MO.0.A0.018224599999999997
SP2_HUMAN.H11MO.0.A0.018224599999999997
MA0146.2_Zfx0.0508746
RFX1_HUMAN.H11MO.0.B0.101504
CEBPZ_HUMAN.H11MO.0.D0.12433399999999999Not shown
NFYB_HUMAN.H11MO.0.A0.12433399999999999Not shown
WT1_HUMAN.H11MO.0.C0.12433399999999999Not shown
MA1650.1_ZBTB140.12433399999999999Not shown
KLF1_HUMAN.H11MO.0.A0.12433399999999999Not shown