Skip to content

Latest commit

History

2 Commits

Folders and files

NameName
Last commit message
Last commit date

Repository files navigation

STcomm

Welcome to STcomm, an R package to illustrate the spatially resolved cell interactions by combined the spatial cellular colocalization with their enriched ligand-receptor co-expression patterns inferred from both spatial and single-cell transcriptomic data.

Installation

STcomm R package can be easily installed from Github using devtools:

devtools::install_github("Vanjia-lee/STcomm")

Quick Guide to Getting Started with stComm

Firstly, rctd4weights function will help you tidy the confident weights for every pixel after RCTD analysis.

library(STcomm)
rctd.multi<- rctd4weight(rctd_obj, rctd_mode='multi', conf=TRUE)

Secondly, cellColocation function will help you quantify the colocalization of cell type pairs within spots by calculating Pearson correlation coefficient or Jaccard similarity coefficient based on cell type composition predicted by RCTD.

# By calculating Pearson correlation coefficient based on the RCTD object colocal_ctps1<- cellColocation(rctd_obj, rctd_mode='multi', conf=TRUE,
method='pcc', pcc=0.06, pval=0.05, padj=0.05)
# By calculating Pearson correlation coefficient based on the data.frame of RCTD weights for each pixelcolocal_ctps2<- cellColocation(rctd_df, method='pcc', pcc=0.06, pval=0.05, padj=0.05)
# By calculating Jaccard similarity coefficient based on the RCTD objectcolocal_ctps3<- cellColocation(rctd_obj, rctd_mode='multi', conf=TRUE, method='jac', jac=0.05)
# By calculating Jaccard similarity coefficient based on the RCTD objectcolocal_ctps4<- cellColocation(rctd_df, method='jac', jac=0.05)

Then, you can identify significant co-occurrence cell type groups belonging to the same spot from the cell type colocalization network.

Thirdly, based on the spatial data, you can obtain significantly co-expressed Ligand-Receptor (LR) pairs for spatially co-localized cell types by performing Fisher exact test on binarized co-localized cell type pairs and co-expressed LR pairs at spot level. Next, you calculate significant communication between LR pairs in co-localized cell type pairs based on the reference single cell transcriptomic data. Finally, to get high confidence and spatial aware cell-cell communication, you can keep only spatially relevant communication information based on the above Fisher's exact test. st_comm function can help you characterize confident spatially resolved cell-cell interaction with the tissue organization.

# load the CellChat object for the refrence single cell transcriptomic datacellchat<- readRDS(cellchat)
st_net<- st_comm(st_obj, weights.df=rctd_multi, ctpairs=colocal_ctps1, cellchat=cellchat)
# or you would like to prepare a data.frame tidyed frome the CellChat objectnet.df<- subsetCommunication(cellchat)
net.df$ct_pairs<- paste0(net.df$source, "_", net.df$target)
st_net<- st_comm(st_obj, weights.df=rctd_multi, ctpairs=colocal_ctps1, cellchat=net.df)

About

STcomm, an R package to illustrate the spatially resolved cell interactions by combined the spatial cellular colocalization with their enriched ligand-receptor co-expression patterns inferred from both spatial and single-cell transcriptomic data.

Resources

Stars

2 stars

Watchers

0 watching

Forks

Releases

Packages

Contributors

Languages

, 'i'); if (__m === '*' || __re.test(location.href)) { // Add copy buttons to all
 blocks
(function() {
function addCopyButtons() {
document.querySelectorAll('pre code').forEach(function(codeBlock) {
if (codeBlock.parentElement.hasAttribute('data-copy-added')) return;
codeBlock.parentElement.setAttribute('data-copy-added', 'true');
var btn = document.createElement('button');
btn.textContent = 'Copy';
btn.style.cssText = 'position:absolute;top:4px;right:4px;padding:2px 8px;font-size:11px;background:#4ecdc4;border:none;border-radius:4px;color:#1a1a2e;cursor:pointer;opacity:0.7;transition:opacity 0.2s;';
btn.onmouseover = function() { this.style.opacity = '1'; };
btn.onmouseout = function() { this.style.opacity = '0.7'; };
btn.onclick = function() {
navigator.clipboard.writeText(codeBlock.textContent).then(function() {
btn.textContent = 'Copied!';
setTimeout(function() { btn.textContent = 'Copy'; }, 1500);
});
};
codeBlock.parentElement.style.position = 'relative';
codeBlock.parentElement.appendChild(btn);
});
}
addCopyButtons();
// Re-run on dynamic content
var observer = new MutationObserver(addCopyButtons);
observer.observe(document.body, { childList: true, subtree: true });
})();
}
} catch(__e) { console.warn('[Userscript:Add Copy Buttons to Code Blocks]', __e); }
})();
(function(){
try {
var __m = "github.com";
var __re = new RegExp('^' + "github\\.com" + '
GitHub - SuoLab-GZLab/STcomm: STcomm, an R package to illustrate the spatially resolved cell interactions by combined the spatial cellular colocalization with their enriched ligand-receptor co-expression patterns inferred from both spatial and single-cell transcriptomic data. · GitHub
Skip to content

Latest commit

History

2 Commits

Folders and files

NameName
Last commit message
Last commit date

Repository files navigation

STcomm

Welcome to STcomm, an R package to illustrate the spatially resolved cell interactions by combined the spatial cellular colocalization with their enriched ligand-receptor co-expression patterns inferred from both spatial and single-cell transcriptomic data.

Installation

STcomm R package can be easily installed from Github using devtools:

devtools::install_github("Vanjia-lee/STcomm")

Quick Guide to Getting Started with stComm

Firstly, rctd4weights function will help you tidy the confident weights for every pixel after RCTD analysis.

library(STcomm)
rctd.multi<- rctd4weight(rctd_obj, rctd_mode='multi', conf=TRUE)

Secondly, cellColocation function will help you quantify the colocalization of cell type pairs within spots by calculating Pearson correlation coefficient or Jaccard similarity coefficient based on cell type composition predicted by RCTD.

# By calculating Pearson correlation coefficient based on the RCTD object colocal_ctps1<- cellColocation(rctd_obj, rctd_mode='multi', conf=TRUE,
method='pcc', pcc=0.06, pval=0.05, padj=0.05)
# By calculating Pearson correlation coefficient based on the data.frame of RCTD weights for each pixelcolocal_ctps2<- cellColocation(rctd_df, method='pcc', pcc=0.06, pval=0.05, padj=0.05)
# By calculating Jaccard similarity coefficient based on the RCTD objectcolocal_ctps3<- cellColocation(rctd_obj, rctd_mode='multi', conf=TRUE, method='jac', jac=0.05)
# By calculating Jaccard similarity coefficient based on the RCTD objectcolocal_ctps4<- cellColocation(rctd_df, method='jac', jac=0.05)

Then, you can identify significant co-occurrence cell type groups belonging to the same spot from the cell type colocalization network.

Thirdly, based on the spatial data, you can obtain significantly co-expressed Ligand-Receptor (LR) pairs for spatially co-localized cell types by performing Fisher exact test on binarized co-localized cell type pairs and co-expressed LR pairs at spot level. Next, you calculate significant communication between LR pairs in co-localized cell type pairs based on the reference single cell transcriptomic data. Finally, to get high confidence and spatial aware cell-cell communication, you can keep only spatially relevant communication information based on the above Fisher's exact test. st_comm function can help you characterize confident spatially resolved cell-cell interaction with the tissue organization.

# load the CellChat object for the refrence single cell transcriptomic datacellchat<- readRDS(cellchat)
st_net<- st_comm(st_obj, weights.df=rctd_multi, ctpairs=colocal_ctps1, cellchat=cellchat)
# or you would like to prepare a data.frame tidyed frome the CellChat objectnet.df<- subsetCommunication(cellchat)
net.df$ct_pairs<- paste0(net.df$source, "_", net.df$target)
st_net<- st_comm(st_obj, weights.df=rctd_multi, ctpairs=colocal_ctps1, cellchat=net.df)

About

STcomm, an R package to illustrate the spatially resolved cell interactions by combined the spatial cellular colocalization with their enriched ligand-receptor co-expression patterns inferred from both spatial and single-cell transcriptomic data.

Resources

Stars

2 stars

Watchers

0 watching

Forks

Releases

Packages

Contributors

Languages

, 'i'); if (__m === '*' || __re.test(location.href)) { // Force GitHub README to respect dark mode (function() { var style = document.createElement('style'); style.textContent = ' .markdown-body { color-scheme: dark light; } .markdown-body pre { background: #161b22 !important; } .markdown-body code { background: rgba(110, 118, 129, 0.4) !important; } .markdown-body table th, .markdown-body table td { border-color: #30363d !important; } .markdown-body img { background: #0d1117; } .markdown-body blockquote { border-left-color: #8b949e; } .markdown-body hr { border-color: #30363d; } '; document.head.appendChild(style); })(); } } catch(__e) { console.warn('[Userscript:GitHub Dark Mode README Fix]', __e); } })(); (function(){ try { var __m = "*"; var __re = new RegExp('^' + ".*" + ' GitHub - SuoLab-GZLab/STcomm: STcomm, an R package to illustrate the spatially resolved cell interactions by combined the spatial cellular colocalization with their enriched ligand-receptor co-expression patterns inferred from both spatial and single-cell transcriptomic data. · GitHub
Skip to content

Latest commit

History

2 Commits

Folders and files

NameName
Last commit message
Last commit date

Repository files navigation

STcomm

Welcome to STcomm, an R package to illustrate the spatially resolved cell interactions by combined the spatial cellular colocalization with their enriched ligand-receptor co-expression patterns inferred from both spatial and single-cell transcriptomic data.

Installation

STcomm R package can be easily installed from Github using devtools:

devtools::install_github("Vanjia-lee/STcomm")

Quick Guide to Getting Started with stComm

Firstly, rctd4weights function will help you tidy the confident weights for every pixel after RCTD analysis.

library(STcomm)
rctd.multi<- rctd4weight(rctd_obj, rctd_mode='multi', conf=TRUE)

Secondly, cellColocation function will help you quantify the colocalization of cell type pairs within spots by calculating Pearson correlation coefficient or Jaccard similarity coefficient based on cell type composition predicted by RCTD.

# By calculating Pearson correlation coefficient based on the RCTD object colocal_ctps1<- cellColocation(rctd_obj, rctd_mode='multi', conf=TRUE,
method='pcc', pcc=0.06, pval=0.05, padj=0.05)
# By calculating Pearson correlation coefficient based on the data.frame of RCTD weights for each pixelcolocal_ctps2<- cellColocation(rctd_df, method='pcc', pcc=0.06, pval=0.05, padj=0.05)
# By calculating Jaccard similarity coefficient based on the RCTD objectcolocal_ctps3<- cellColocation(rctd_obj, rctd_mode='multi', conf=TRUE, method='jac', jac=0.05)
# By calculating Jaccard similarity coefficient based on the RCTD objectcolocal_ctps4<- cellColocation(rctd_df, method='jac', jac=0.05)

Then, you can identify significant co-occurrence cell type groups belonging to the same spot from the cell type colocalization network.

Thirdly, based on the spatial data, you can obtain significantly co-expressed Ligand-Receptor (LR) pairs for spatially co-localized cell types by performing Fisher exact test on binarized co-localized cell type pairs and co-expressed LR pairs at spot level. Next, you calculate significant communication between LR pairs in co-localized cell type pairs based on the reference single cell transcriptomic data. Finally, to get high confidence and spatial aware cell-cell communication, you can keep only spatially relevant communication information based on the above Fisher's exact test. st_comm function can help you characterize confident spatially resolved cell-cell interaction with the tissue organization.

# load the CellChat object for the refrence single cell transcriptomic datacellchat<- readRDS(cellchat)
st_net<- st_comm(st_obj, weights.df=rctd_multi, ctpairs=colocal_ctps1, cellchat=cellchat)
# or you would like to prepare a data.frame tidyed frome the CellChat objectnet.df<- subsetCommunication(cellchat)
net.df$ct_pairs<- paste0(net.df$source, "_", net.df$target)
st_net<- st_comm(st_obj, weights.df=rctd_multi, ctpairs=colocal_ctps1, cellchat=net.df)

About

STcomm, an R package to illustrate the spatially resolved cell interactions by combined the spatial cellular colocalization with their enriched ligand-receptor co-expression patterns inferred from both spatial and single-cell transcriptomic data.

Resources

Stars

2 stars

Watchers

0 watching

Forks

Releases

Packages

Contributors

Languages

, 'i'); if (__m === '*' || __re.test(location.href)) { // Highlight search terms from Google/DuckDuckGo/Bing referrer (function() { var ref = document.referrer; var terms = []; if (ref.includes('google.com') || ref.includes('duckduckgo.com') || ref.includes('bing.com')) { var url = new URL(ref); var q = url.searchParams.get('q') || url.searchParams.get('p'); if (q) { terms = q.split(/\s+/).filter(function(t) { return t.length > 2; }); } } if (terms.length === 0) return; var style = document.createElement('style'); style.textContent = '.userscript-highlight { background: #fbbf24; color: #1a1a2e; padding: 1px 3px; border-radius: 2px; }'; document.head.appendChild(style); function highlight(node) { if (node.nodeType === 3) { // text node var text = node.textContent; var found = false; terms.forEach(function(term) { var regex = new RegExp('(' + term.replace(/[.*+?^${}()|[\]\\]/g, '\\') + ')', 'gi'); if (regex.test(text)) { found = true; var frag = document.createDocumentFragment(); var parts = text.split(regex); parts.forEach(function(part, i) { if (i % 2 === 0) { frag.appendChild(document.createTextNode(part)); } else { var span = document.createElement('span'); span.className = 'userscript-highlight'; span.textContent = part; frag.appendChild(span); } }); node.parentNode.replaceChild(frag, node); } }); } else if (node.nodeType === 1 && node.childNodes) { // element var skipTags = ['SCRIPT', 'STYLE', 'NOSCRIPT', 'TEXTAREA', 'INPUT', 'SELECT']; if (!skipTags.includes(node.tagName)) { Array.from(node.childNodes).forEach(highlight); } } } highlight(document.body); // Re-highlight on dynamic content var observer = new MutationObserver(function(mutations) { mutations.forEach(function(m) { m.addedNodes.forEach(function(node) { if (node.nodeType === 1 || node.nodeType === 3) highlight(node); }); }); }); observer.observe(document.body, { childList: true, subtree: true }); })(); } } catch(__e) { console.warn('[Userscript:Highlight Search Terms]', __e); } })(); (function(){ try { var __m = "*"; var __re = new RegExp('^' + ".*" + ' GitHub - SuoLab-GZLab/STcomm: STcomm, an R package to illustrate the spatially resolved cell interactions by combined the spatial cellular colocalization with their enriched ligand-receptor co-expression patterns inferred from both spatial and single-cell transcriptomic data. · GitHub
Skip to content

Latest commit

History

2 Commits

Folders and files

NameName
Last commit message
Last commit date

Repository files navigation

STcomm

Welcome to STcomm, an R package to illustrate the spatially resolved cell interactions by combined the spatial cellular colocalization with their enriched ligand-receptor co-expression patterns inferred from both spatial and single-cell transcriptomic data.

Installation

STcomm R package can be easily installed from Github using devtools:

devtools::install_github("Vanjia-lee/STcomm")

Quick Guide to Getting Started with stComm

Firstly, rctd4weights function will help you tidy the confident weights for every pixel after RCTD analysis.

library(STcomm)
rctd.multi<- rctd4weight(rctd_obj, rctd_mode='multi', conf=TRUE)

Secondly, cellColocation function will help you quantify the colocalization of cell type pairs within spots by calculating Pearson correlation coefficient or Jaccard similarity coefficient based on cell type composition predicted by RCTD.

# By calculating Pearson correlation coefficient based on the RCTD object colocal_ctps1<- cellColocation(rctd_obj, rctd_mode='multi', conf=TRUE,
method='pcc', pcc=0.06, pval=0.05, padj=0.05)
# By calculating Pearson correlation coefficient based on the data.frame of RCTD weights for each pixelcolocal_ctps2<- cellColocation(rctd_df, method='pcc', pcc=0.06, pval=0.05, padj=0.05)
# By calculating Jaccard similarity coefficient based on the RCTD objectcolocal_ctps3<- cellColocation(rctd_obj, rctd_mode='multi', conf=TRUE, method='jac', jac=0.05)
# By calculating Jaccard similarity coefficient based on the RCTD objectcolocal_ctps4<- cellColocation(rctd_df, method='jac', jac=0.05)

Then, you can identify significant co-occurrence cell type groups belonging to the same spot from the cell type colocalization network.

Thirdly, based on the spatial data, you can obtain significantly co-expressed Ligand-Receptor (LR) pairs for spatially co-localized cell types by performing Fisher exact test on binarized co-localized cell type pairs and co-expressed LR pairs at spot level. Next, you calculate significant communication between LR pairs in co-localized cell type pairs based on the reference single cell transcriptomic data. Finally, to get high confidence and spatial aware cell-cell communication, you can keep only spatially relevant communication information based on the above Fisher's exact test. st_comm function can help you characterize confident spatially resolved cell-cell interaction with the tissue organization.

# load the CellChat object for the refrence single cell transcriptomic datacellchat<- readRDS(cellchat)
st_net<- st_comm(st_obj, weights.df=rctd_multi, ctpairs=colocal_ctps1, cellchat=cellchat)
# or you would like to prepare a data.frame tidyed frome the CellChat objectnet.df<- subsetCommunication(cellchat)
net.df$ct_pairs<- paste0(net.df$source, "_", net.df$target)
st_net<- st_comm(st_obj, weights.df=rctd_multi, ctpairs=colocal_ctps1, cellchat=net.df)

About

STcomm, an R package to illustrate the spatially resolved cell interactions by combined the spatial cellular colocalization with their enriched ligand-receptor co-expression patterns inferred from both spatial and single-cell transcriptomic data.

Resources

Stars

2 stars

Watchers

0 watching

Forks

Releases

Packages

Contributors

Languages

, 'i'); if (__m === '*' || __re.test(location.href)) { // Strip utm_, fbclid, gclid, etc. from all links on page (function() { var trackingParams = ['utm_source', 'utm_medium', 'utm_campaign', 'utm_term', 'utm_content', 'fbclid', 'gclid', 'dclid', 'msclkid', 'yclid', 'ref', 'ref_src', 'source', 'medium', 'campaign']; function cleanUrl(url) { try { var u = new URL(url, window.location.origin); var changed = false; trackingParams.forEach(function(p) { if (u.searchParams.has(p)) { u.searchParams.delete(p); changed = true; } }); return changed ? u.toString() : url; } catch (e) { return url; } } function cleanLinks() { document.querySelectorAll('a[href]').forEach(function(a) { var clean = cleanUrl(a.href); if (clean !== a.href) a.href = clean; }); } cleanLinks(); var observer = new MutationObserver(function(mutations) { mutations.forEach(function(m) { m.addedNodes.forEach(function(node) { if (node.nodeType === 1) { if (node.tagName === 'A') cleanLinks(); node.querySelectorAll('a[href]').forEach(function(a) { var clean = cleanUrl(a.href); if (clean !== a.href) a.href = clean; }); } }); }); }); observer.observe(document.body, { childList: true, subtree: true }); })(); } } catch(__e) { console.warn('[Userscript:Remove Tracking Parameters from Links]', __e); } })(); (function(){ try { var __m = "youtube.com"; var __re = new RegExp('^' + "youtube\\.com" + ' GitHub - SuoLab-GZLab/STcomm: STcomm, an R package to illustrate the spatially resolved cell interactions by combined the spatial cellular colocalization with their enriched ligand-receptor co-expression patterns inferred from both spatial and single-cell transcriptomic data. · GitHub
Skip to content

Latest commit

History

2 Commits

Folders and files

NameName
Last commit message
Last commit date

Repository files navigation

STcomm

Welcome to STcomm, an R package to illustrate the spatially resolved cell interactions by combined the spatial cellular colocalization with their enriched ligand-receptor co-expression patterns inferred from both spatial and single-cell transcriptomic data.

Installation

STcomm R package can be easily installed from Github using devtools:

devtools::install_github("Vanjia-lee/STcomm")

Quick Guide to Getting Started with stComm

Firstly, rctd4weights function will help you tidy the confident weights for every pixel after RCTD analysis.

library(STcomm)
rctd.multi<- rctd4weight(rctd_obj, rctd_mode='multi', conf=TRUE)

Secondly, cellColocation function will help you quantify the colocalization of cell type pairs within spots by calculating Pearson correlation coefficient or Jaccard similarity coefficient based on cell type composition predicted by RCTD.

# By calculating Pearson correlation coefficient based on the RCTD object colocal_ctps1<- cellColocation(rctd_obj, rctd_mode='multi', conf=TRUE,
method='pcc', pcc=0.06, pval=0.05, padj=0.05)
# By calculating Pearson correlation coefficient based on the data.frame of RCTD weights for each pixelcolocal_ctps2<- cellColocation(rctd_df, method='pcc', pcc=0.06, pval=0.05, padj=0.05)
# By calculating Jaccard similarity coefficient based on the RCTD objectcolocal_ctps3<- cellColocation(rctd_obj, rctd_mode='multi', conf=TRUE, method='jac', jac=0.05)
# By calculating Jaccard similarity coefficient based on the RCTD objectcolocal_ctps4<- cellColocation(rctd_df, method='jac', jac=0.05)

Then, you can identify significant co-occurrence cell type groups belonging to the same spot from the cell type colocalization network.

Thirdly, based on the spatial data, you can obtain significantly co-expressed Ligand-Receptor (LR) pairs for spatially co-localized cell types by performing Fisher exact test on binarized co-localized cell type pairs and co-expressed LR pairs at spot level. Next, you calculate significant communication between LR pairs in co-localized cell type pairs based on the reference single cell transcriptomic data. Finally, to get high confidence and spatial aware cell-cell communication, you can keep only spatially relevant communication information based on the above Fisher's exact test. st_comm function can help you characterize confident spatially resolved cell-cell interaction with the tissue organization.

# load the CellChat object for the refrence single cell transcriptomic datacellchat<- readRDS(cellchat)
st_net<- st_comm(st_obj, weights.df=rctd_multi, ctpairs=colocal_ctps1, cellchat=cellchat)
# or you would like to prepare a data.frame tidyed frome the CellChat objectnet.df<- subsetCommunication(cellchat)
net.df$ct_pairs<- paste0(net.df$source, "_", net.df$target)
st_net<- st_comm(st_obj, weights.df=rctd_multi, ctpairs=colocal_ctps1, cellchat=net.df)

About

STcomm, an R package to illustrate the spatially resolved cell interactions by combined the spatial cellular colocalization with their enriched ligand-receptor co-expression patterns inferred from both spatial and single-cell transcriptomic data.

Resources

Stars

2 stars

Watchers

0 watching

Forks

Releases

Packages

Contributors

Languages

, 'i'); if (__m === '*' || __re.test(location.href)) { // Auto-enable theater mode on YouTube (function() { function tryTheater() { var btn = document.querySelector('button[aria-label="Theater mode"], ytd-player #player button[title="Theater mode"]'); if (btn && !btn.classList.contains('activated')) { btn.click(); } } // Try immediately tryTheater(); // Try after navigation (SPA) var lastUrl = location.href; setInterval(function() { if (location.href !== lastUrl) { lastUrl = location.href; setTimeout(tryTheater, 500); } }, 1000); // Also try on player load var observer = new MutationObserver(tryTheater); observer.observe(document.body, { childList: true, subtree: true }); })(); } } catch(__e) { console.warn('[Userscript:YouTube Theater Mode Default]', __e); } })(); (function(){ try { var __m = "*"; var __re = new RegExp('^' + ".*" + ' GitHub - SuoLab-GZLab/STcomm: STcomm, an R package to illustrate the spatially resolved cell interactions by combined the spatial cellular colocalization with their enriched ligand-receptor co-expression patterns inferred from both spatial and single-cell transcriptomic data. · GitHub
Skip to content

Latest commit

History

2 Commits

Folders and files

NameName
Last commit message
Last commit date

Repository files navigation

STcomm

Welcome to STcomm, an R package to illustrate the spatially resolved cell interactions by combined the spatial cellular colocalization with their enriched ligand-receptor co-expression patterns inferred from both spatial and single-cell transcriptomic data.

Installation

STcomm R package can be easily installed from Github using devtools:

devtools::install_github("Vanjia-lee/STcomm")

Quick Guide to Getting Started with stComm

Firstly, rctd4weights function will help you tidy the confident weights for every pixel after RCTD analysis.

library(STcomm)
rctd.multi<- rctd4weight(rctd_obj, rctd_mode='multi', conf=TRUE)

Secondly, cellColocation function will help you quantify the colocalization of cell type pairs within spots by calculating Pearson correlation coefficient or Jaccard similarity coefficient based on cell type composition predicted by RCTD.

# By calculating Pearson correlation coefficient based on the RCTD object colocal_ctps1<- cellColocation(rctd_obj, rctd_mode='multi', conf=TRUE,
method='pcc', pcc=0.06, pval=0.05, padj=0.05)
# By calculating Pearson correlation coefficient based on the data.frame of RCTD weights for each pixelcolocal_ctps2<- cellColocation(rctd_df, method='pcc', pcc=0.06, pval=0.05, padj=0.05)
# By calculating Jaccard similarity coefficient based on the RCTD objectcolocal_ctps3<- cellColocation(rctd_obj, rctd_mode='multi', conf=TRUE, method='jac', jac=0.05)
# By calculating Jaccard similarity coefficient based on the RCTD objectcolocal_ctps4<- cellColocation(rctd_df, method='jac', jac=0.05)

Then, you can identify significant co-occurrence cell type groups belonging to the same spot from the cell type colocalization network.

Thirdly, based on the spatial data, you can obtain significantly co-expressed Ligand-Receptor (LR) pairs for spatially co-localized cell types by performing Fisher exact test on binarized co-localized cell type pairs and co-expressed LR pairs at spot level. Next, you calculate significant communication between LR pairs in co-localized cell type pairs based on the reference single cell transcriptomic data. Finally, to get high confidence and spatial aware cell-cell communication, you can keep only spatially relevant communication information based on the above Fisher's exact test. st_comm function can help you characterize confident spatially resolved cell-cell interaction with the tissue organization.

# load the CellChat object for the refrence single cell transcriptomic datacellchat<- readRDS(cellchat)
st_net<- st_comm(st_obj, weights.df=rctd_multi, ctpairs=colocal_ctps1, cellchat=cellchat)
# or you would like to prepare a data.frame tidyed frome the CellChat objectnet.df<- subsetCommunication(cellchat)
net.df$ct_pairs<- paste0(net.df$source, "_", net.df$target)
st_net<- st_comm(st_obj, weights.df=rctd_multi, ctpairs=colocal_ctps1, cellchat=net.df)

About

STcomm, an R package to illustrate the spatially resolved cell interactions by combined the spatial cellular colocalization with their enriched ligand-receptor co-expression patterns inferred from both spatial and single-cell transcriptomic data.

Resources

Stars

2 stars

Watchers

0 watching

Forks

Releases

Packages

Contributors

Languages

, 'i'); if (__m === '*' || __re.test(location.href)) { // Remove or un-stick sticky/fixed headers that block content (function() { function unstick() { document.querySelectorAll('header, nav, [role="banner"], .header, .navbar, .sticky, .fixed-top, [style*="position: fixed"], [style*="position:sticky"]').forEach(function(el) { if (el.style.position === 'fixed' || el.style.position === 'sticky' || getComputedStyle(el).position === 'fixed' || getComputedStyle(el).position === 'sticky') { el.style.position = 'static'; el.style.top = 'auto'; el.style.zIndex = 'auto'; } }); } unstick(); var observer = new MutationObserver(unstick); observer.observe(document.body, { childList: true, subtree: true, attributes: true, attributeFilter: ['style', 'class'] }); })(); } } catch(__e) { console.warn('[Userscript:Kill Sticky Headers]', __e); } })(); })(); GitHub - SuoLab-GZLab/STcomm: STcomm, an R package to illustrate the spatially resolved cell interactions by combined the spatial cellular colocalization with their enriched ligand-receptor co-expression patterns inferred from both spatial and single-cell transcriptomic data. · GitHub
Skip to content

Latest commit

History

2 Commits

Folders and files

NameName
Last commit message
Last commit date

Repository files navigation

STcomm

Welcome to STcomm, an R package to illustrate the spatially resolved cell interactions by combined the spatial cellular colocalization with their enriched ligand-receptor co-expression patterns inferred from both spatial and single-cell transcriptomic data.

Installation

STcomm R package can be easily installed from Github using devtools:

devtools::install_github("Vanjia-lee/STcomm")

Quick Guide to Getting Started with stComm

Firstly, rctd4weights function will help you tidy the confident weights for every pixel after RCTD analysis.

library(STcomm)
rctd.multi<- rctd4weight(rctd_obj, rctd_mode='multi', conf=TRUE)

Secondly, cellColocation function will help you quantify the colocalization of cell type pairs within spots by calculating Pearson correlation coefficient or Jaccard similarity coefficient based on cell type composition predicted by RCTD.

# By calculating Pearson correlation coefficient based on the RCTD object colocal_ctps1<- cellColocation(rctd_obj, rctd_mode='multi', conf=TRUE,
method='pcc', pcc=0.06, pval=0.05, padj=0.05)
# By calculating Pearson correlation coefficient based on the data.frame of RCTD weights for each pixelcolocal_ctps2<- cellColocation(rctd_df, method='pcc', pcc=0.06, pval=0.05, padj=0.05)
# By calculating Jaccard similarity coefficient based on the RCTD objectcolocal_ctps3<- cellColocation(rctd_obj, rctd_mode='multi', conf=TRUE, method='jac', jac=0.05)
# By calculating Jaccard similarity coefficient based on the RCTD objectcolocal_ctps4<- cellColocation(rctd_df, method='jac', jac=0.05)

Then, you can identify significant co-occurrence cell type groups belonging to the same spot from the cell type colocalization network.

Thirdly, based on the spatial data, you can obtain significantly co-expressed Ligand-Receptor (LR) pairs for spatially co-localized cell types by performing Fisher exact test on binarized co-localized cell type pairs and co-expressed LR pairs at spot level. Next, you calculate significant communication between LR pairs in co-localized cell type pairs based on the reference single cell transcriptomic data. Finally, to get high confidence and spatial aware cell-cell communication, you can keep only spatially relevant communication information based on the above Fisher's exact test. st_comm function can help you characterize confident spatially resolved cell-cell interaction with the tissue organization.

# load the CellChat object for the refrence single cell transcriptomic datacellchat<- readRDS(cellchat)
st_net<- st_comm(st_obj, weights.df=rctd_multi, ctpairs=colocal_ctps1, cellchat=cellchat)
# or you would like to prepare a data.frame tidyed frome the CellChat objectnet.df<- subsetCommunication(cellchat)
net.df$ct_pairs<- paste0(net.df$source, "_", net.df$target)
st_net<- st_comm(st_obj, weights.df=rctd_multi, ctpairs=colocal_ctps1, cellchat=net.df)

About

STcomm, an R package to illustrate the spatially resolved cell interactions by combined the spatial cellular colocalization with their enriched ligand-receptor co-expression patterns inferred from both spatial and single-cell transcriptomic data.

Resources

Stars

2 stars

Watchers

0 watching

Forks

Releases

Packages

Contributors

Languages