install
source · Clone the upstream repo
git clone https://github.com/FreedomIntelligence/OpenClaw-Medical-Skills
Claude Code · Install into ~/.claude/skills/
T=$(mktemp -d) && git clone --depth=1 https://github.com/FreedomIntelligence/OpenClaw-Medical-Skills "$T" && mkdir -p ~/.claude/skills && cp -r "$T/skills/bio-epitranscriptomics-m6a-differential" ~/.claude/skills/freedomintelligence-openclaw-medical-skills-bio-epitranscriptomics-m6a-different && rm -rf "$T"
OpenClaw · Install into ~/.openclaw/skills/
T=$(mktemp -d) && git clone --depth=1 https://github.com/FreedomIntelligence/OpenClaw-Medical-Skills "$T" && mkdir -p ~/.openclaw/skills && cp -r "$T/skills/bio-epitranscriptomics-m6a-differential" ~/.openclaw/skills/freedomintelligence-openclaw-medical-skills-bio-epitranscriptomics-m6a-different && rm -rf "$T"
manifest:
skills/bio-epitranscriptomics-m6a-differential/SKILL.mdsource content
<!--
# COPYRIGHT NOTICE
# This file is part of the "Universal Biomedical Skills" project.
# Copyright (c) 2026 MD BABU MIA, PhD <md.babu.mia@mssm.edu>
# All Rights Reserved.
#
# This code is proprietary and confidential.
# Unauthorized copying of this file, via any medium is strictly prohibited.
#
# Provenance: Authenticated by MD BABU MIA
-->
name: bio-epitranscriptomics-m6a-differential description: Identify differential m6A methylation between conditions from MeRIP-seq. Use when comparing epitranscriptomic changes between treatment groups or cell states. tool_type: r primary_tool: exomePeak2 measurable_outcome: Execute skill workflow successfully with valid output within 15 minutes. allowed-tools:
- read_file
- run_shell_command
Differential m6A Analysis
exomePeak2 Differential Analysis
library(exomePeak2) # Define sample design # condition: factor for comparison design <- data.frame( condition = factor(c('ctrl', 'ctrl', 'treat', 'treat')) ) # Differential peak calling result <- exomePeak2( bam_ip = c('ctrl_IP1.bam', 'ctrl_IP2.bam', 'treat_IP1.bam', 'treat_IP2.bam'), bam_input = c('ctrl_Input1.bam', 'ctrl_Input2.bam', 'treat_Input1.bam', 'treat_Input2.bam'), gff = 'genes.gtf', genome = 'hg38', experiment_design = design ) # Get differential sites diff_sites <- results(result, contrast = c('condition', 'treat', 'ctrl'))
QNB for Differential Methylation
library(QNB) # Requires count matrices from peak regions # IP and input counts per sample qnb_result <- qnbtest( IP_count_matrix, Input_count_matrix, group = c(1, 1, 2, 2) # 1=ctrl, 2=treat ) # Filter significant # padj < 0.05, |log2FC| > 1 sig <- qnb_result[qnb_result$padj < 0.05 & abs(qnb_result$log2FC) > 1, ]
Visualization
library(ggplot2) # Volcano plot ggplot(diff_sites, aes(x = log2FoldChange, y = -log10(padj))) + geom_point(aes(color = padj < 0.05 & abs(log2FoldChange) > 1)) + geom_hline(yintercept = -log10(0.05), linetype = 'dashed') + geom_vline(xintercept = c(-1, 1), linetype = 'dashed')
Related Skills
- m6a-peak-calling - Identify peaks first
- differential-expression/de-results - Similar statistical concepts
- modification-visualization - Plot differential sites