242 lines (226 with data), 18.8 kB
U
¨cHk ã @ s¼ U d dl mZ d dlZd dlZd dlZd dlZd dlZ d dl
Z d dl Z d dl
mZ d dlmZ d dlmZ d dlmZ d dlmZmZmZmZmZ d dl m Z d dl m Z m Z m!Z! d d l"m#Z# d dl$Z$d dl%Z%e$j&d
d Z'ede(f e)d < e'dkre$j&d
d Z'e(e)d < e *e+¡Z,dddddddddgddddd
dddd d d d d e- fe j.e(e/e(ee0 e/e/ee/df ee/ e1e/e/ee/df e(e0e0e(ede(ej2j3ej2j4f e-ee/ee0def f d d d!Z5dddddddddgddddd
dddd d d d d e- fe j.e(e/e(ee0 e/e/ee/df ee/ e1e/e/ee/df e(e0e0e(ede(ej2j3ej2j4f e-ee/ee0def f d d"d#Z6ede(f e(d$d%d&Z7d'd( Z8dLe j.e/e(e(e1ej9d*d+d,Z:dMe j.e/d-d.d/Z;dNe j.e/e/e(e0e(ede(f e1ee0e0e0f d1 d2d3Z<d4d5 Z=d6d7 Z>dOe j.e/e/e(e(e(e(ede(f e1e0d:
d;d<Z?dPe j.ee0 e/e/e/ee/e0e0f d=d>d?Z@dd d d@dAd
d e- fe j.ee/ee/ df e0e0e/e/e1e(e-edef dB
dCdDZAdQe/e(e1e1e(ee( dIdJdKZBdS )Ré )ÚinfN)ÚFigure)Úspmatrix)Úchi2)ÚMappingÚSequenceÚTupleÚIterableÚUnion)Úissparse)Úadjusted_rand_scoreÚ normalized_mutual_info_scoreÚsilhouette_samples)ÚNearestNeighborsF)ZlogicalÚ
_cpu_countTÚdeltaé g{®Gáz?g{®Gáz?g{®Gáz¤?g{®Gáz´?g{®GázÄ?g{®GázÔ?g{®Gázä?ÚleidenÚ
cell_typesÚ
batch_indicesÚumapZjpgi, g333333Ó?é )ÚadataÚn_epochÚ
embedding_keyÚ n_neighborsÚ resolutionsÚclustering_methodÚ
cell_type_colÚ batch_colÚcolor_byÚ
return_figÚ
plot_fnameÚ
plot_ftypeÚplot_dirÚplot_dpiÚmin_distÚspreadÚn_jobsÚ random_stateÚ umap_kwargsÚreturnc ! C sª |r4t jj | j| ¡s4| j| t¡ d¡| j|< |rht jj | j| ¡sh| j| t¡ d¡| j|< t| |||dd || jkrªt|dkrªt | ||||d\}}}n d } }}| j|
¡ dkrZt |dkrÚ| j n| j
| | j| }|| jd < t |¡}tjj| ||d
}|rb|rb| jj||d d d }| dk rb| tj | |
d
¡¡ nd}d}|ox| j|
¡ dk}|rÐt| |||d|d}t| |||d|dd } tjj| |d|dd} t| |d} nd } } } } | sð| dk r|dkr|r||gn|g}t |}d| j krJ| j d D ] } | |kr,| d| ¡ q,|dk r^|g| }t | |||| |
t| d| | |
|d } nd} t |||||| | | | d S )áÕ Evaluates the clustering and batch correction performance of the given
embeddings, and optionally plots the embeddings.
Embeddings will be plotted if return_fig is True or plot_dir is provided.
When tensorboard_dir is provided, will also save the embeddings using a
tensorboard SummaryWriter.
NOTE: Set n_jobs to 1 if you encounter pickling error.
Args:
adata: the dataset with the embedding to be evaluated.
embedding_key: the key to the embedding. Must be in adata.obsm.
n_neighbors: #neighbors used when computing neithborhood graph and
calculating entropy of batch mixing / kBET.
resolutions: a sequence of resolutions used for clustering.
clustering_method: clustering method used. Should be one of 'leiden' or
'louvain'.
cell_type_col: a key in adata.obs to the cell type column.
batch_col: a key in adata.obs to the batch column.
return_fig: whether to return the Figure object. Useful for visualizing
the plot.
color_by: a list of adata.obs column keys to color the embeddings by.
If None, will look up adata.uns['color_by']. Only used if is
drawing.
plot_fname: file name of the generated plot. Only used if is drawing.
plot_ftype: file type of the generated plot. Only used if is drawing.
plot_dir: directory to save the generated plot. If None, do not save
the plot.
plot_dpi: dpi to save the plot.
writer: an initialized SummaryWriter to save the UMAP plot to. Only
used if is drawing.
min_dist: the min_dist argument in sc.tl.umap. Only used is drawing.
spread: the spread argument in sc.tl.umap. Only used if is drawing.
n_jobs: # jobs to generate. If <= 0, this is set to the number of
physical cores.
random_state: random state for knn calculation.
umap_kwargs: other kwargs to pass to sc.pl.umap.
Returns:
A dict storing the ari, nmi, asw, ebm and k_bet of the cell embeddings
with key "ari", "nmi", "asw", "ebm", "k_bet", respectively. If draw is
True and return_fig is True, will also store the plotted figure with
key "fig".
ÚcategoryT©Úuse_repr r) Úcalc_knnr ©r r r r Nr ÚXZsilhouette_width)Ú group_keyÚembedÚmean)ÚindexÚcolumnsÚvaluesZaggfuncz.csvg F)r/ r r r0 r( é Ú cell_type)Z batch_keyr3 r4 Úverbose©r/ r Ú.) r r r& r' Úckpt_dirÚfnamer! Údpir* ) ÚariÚnmiÚaswÚasw_2ÚebmÚk_betÚ batch_aswÚbatch_graph_scoreÚfig)!ÚpdÚapiÚtypesÚis_categorical_dtypeÚobsÚastypeÚstrÚ_get_knn_indicesÚlenÚ
clusteringÚnuniquer r2 ÚobsmÚnpr5 ÚscibÚmeZ
silhouetteZ pivot_tableÚto_csvÚosÚpathÚjoinÚ calculate_entropy_batch_mixingÚcalculate_kbetZsilhouette_batchÚget_graph_connectivityÚlistÚunsÚinsertÚdraw_embeddingsÚdict)!r r r r r r r r r r! r" r# r$ r% r& r' r( r) r* Ú cluster_keyÚbest_ariÚbest_nmiÚswrC rD Zsw_tableZ
need_batchrE rF rG rH ÚcolrI © rj úME:\cornell work\moETM\Demo code_all_data_pathway_gene_embedding\eval_utils.pyÚevaluate s A ÿ
ÿ
ûûú
ü÷rl c C sº |r4t jj | j| ¡s4| j| t¡ d¡| j|< |rht jj | j| ¡sh| j| t¡ d¡| j|< t| |||dd || jkrªt|dkrªt | ||||d\}}}n d } }}|S )r, r- Tr. r r1 N)
rJ rK rL rM rN rO rP rQ rR rS )r r r r r r r r r r! r" r# r$ r% r& r' r( r) r* re rf rg rj rj rk Ú evaluate_ari¹ s A rm )r( r+ c C s | dkr dS | dkr t | S tS )zAIf n_jobs <= 0, set it as the number of physical cores _cpu_countNr r )Úintr ©r( rj rj rk Ú _eff_n_jobs s rp c C s |j d }| jd }t |df¡}t|D ]n}t || |d d
f ¡jddj}|| } t || d | ¡}
dt
|
|¡ } |
||df< | ||df< q*|S )Nr r r9 F)Úsort) ÚsizeÚshaperV ÚzerosÚrangerJ ÚSeriesÚ value_countsr8 Úsumr Úcdf) Ú knn_indicesÚ attr_valuesÚ
ideal_distr ÚdofÚnsÚresultsÚiZobserved_countsZexpected_countsÚstatZp_valuerj rj rk Ú _calculate_kbet_for_one_chunk s
$ r é )r r/ r r) r0 r+ c C sÚ |r|dks$|| j ks$t| dt | ¡}|j|d||dd |j| jd< |j| jd< |j| j d< ddd||dd d
d | j d < nJd | j kstd
| j d d d |ksÐtd| j d d d d| | j d S )Nr2 z! not in adata.obsm and is not "X"T)r Zknnr/ r) Zwrite_knn_indicesÚ distancesÚconnectivitiesrz Z euclideanr )r r/ ÚmetricÚmethod)Zconnectivities_keyZ
distances_keyZknn_indices_keyÚparamsÚ neighborszNo precomputed knn exists.r r z pre-computed n_neighbors is z, which is smaller than )
rU ÚAssertionErrorÚscZ NeighborsZcompute_neighborsr Zobspr
rz ra )r r/ r r) r0 r rj rj rk rQ % s6
ÿ üü ÿÿ ÿrQ )r r/ c C s$ t jj| |d tjj| dd}|S )Nr< r: )Z label_key)r Úppr rW rX Zgraph_connectivity)r r/ Úscorerj rj rk r_ E s r_ ç©?) r r/ r r Úalphar) r( r0 r+ c
s t d¡ || jkst| j| jjdkrRt d| d¡ | j| d¡| j|< | j| jdddj | j
d }j } | j| j ¡ t
| _t| |||tt||}tj|d td
|| }
|| } t
|D ](} | |
| | k rôd nd | d < qÚdd lm}
mm} |d |d
2 t |
fddt
|D ¡}W 5 Q R X |jdd}|d }|d }|dd
d f |k ¡ | }|||fS )a² Calculates the kBET metric of the data.
kBET measures if cells from different batches mix well in their local
neighborhood.
Args:
adata: annotated data matrix.
use_rep: the embedding to be used. Must exist in adata.obsm.
batch_col: a key in adata.obs to the batch column.
n_neighbors: # nearest neighbors.
alpha: acceptance rate threshold. A cell is accepted if its kBET
p-value is greater than or equal to alpha.
random_state: random seed. Used only if method is "hnsw".
n_jobs: # jobs to generate. If <= 0, this is set to the number of
physical cores.
calc_knn: whether to re-calculate the kNN graph or reuse the one stored
in adata.
Returns:
stat_mean: mean kBET chi-square statistic over all cells.
pvalue_mean: mean kBET p-value over all cells.
accept_rate: kBET Acceptance rate of the sample.
zCalculating kbet...r- zMaking the column z of adata.obs categorical.TF)Ú normalizerq r r )Údtype©ÚParallelÚdelayedÚparallel_backendÚlokyro c 3 s< | ]4}t | |d
dd
f V qdS )r N)r ©Ú.0r ©r{ r r| rz r Zstartsrj rk Ú <genexpr> s ý ÿz!calculate_kbet.<locals>.<genexpr>)ÚaxisN) Ú_loggerÚinforN r r ÚnameÚwarningrO rw r8 rs rr Úcopyru Ú
categoriesrQ Úminrp rV rt rn Újoblibr r r Ú concatenater5 rx )r r/ r r r r) r( r0 ÚnsampleÚnbatchZquotientÚ remainderr r r ZkBET_arrÚresZ stat_meanZ pvalue_meanZ accept_raterj r rk r^ M s< "
ÿ
&üÿ r^ c C s6 t j| dd\}}|| ¡ }| t |d ¡ ¡ S )NT)Ú
return_countsg ÂëþKH´9)rV Úuniquerx Úlog)Z hist_dataÚ_ÚcountsZfreqsrj rj rk Ú_entropy s r® c s6 t jjt |¡|dt fddt|D ¡S )N)rr c s g | ]}t | qS rj )r® r ©ÚbatchesÚindicesrz rj rk Ú
<listcomp>¤ s ÿz6_entropy_batch_mixing_for_one_pool.<locals>.<listcomp>)rV ÚrandomÚchoiceÚaranger5 ru )r° rz r¥ Ún_samples_per_poolrj r¯ rk Ú"_entropy_batch_mixing_for_one_pool s ÿþÿr· é2 éd )
r r/ r r Ún_poolsr¶ r) r( r0 r+ c
s~ t d¡ jt ||||ddlm} mm}
|
d|dd2 t | fddt
|D ¡} W 5 Q R X | S ) aq Calculates the entropy of batch mixing of the data.
kBET measures if cells from different batches mix well in their local
neighborhood.
Args:
adata: annotated data matrix.
use_rep: the embedding to be used. Must exist in adata.obsm.
batch_col: a key in adata.obs to the batch column.
n_neighbors: # nearest neighbors.
n_pools: #pools of cells to calculate entropy of batch mixing.
n_samples_per_pool: #cells per pool to calculate within-pool entropy.
random_state: random seed. Used only if method is "hnsw".
n_jobs: # jobs to generate. If <= 0, this is set to the number of
physical cores.
calc_knn: whether to re-calculate the kNN graph or reuse the one stored
in adata.
Returns:
score: the mean entropy of batch mixing, averaged from n_pools samples.
z#Calculating batch mixing entropy...r r r r )r( Zinner_max_num_threadsc 3 s& | ] }t j V qd S )N)r· rN )r r¬ ©r r r rz r¶ r¥ rj rk r Ô s ý ÿz1calculate_entropy_batch_mixing.<locals>.<genexpr>) r r Ún_obsrQ r£ r r r rV r5 ru ) r r/ r r rº r¶ r) r( r0 r r r rj r» rk r] « s !
üÿr] )r r r r r r+ c C s8 t |dkstd|dkr&tjj}n|dkr8tjj}ntd|| jksXt| ddt t }}}|D ]²} | d| }
|| | |
d t | j| | j|
} t
| j| | j|
} | j|
¡ }
| |krÚ| }| }| |kræ| }|| jkr | j| ¡ d
kr t | j| | j|
}qpd}qp| d| ||fS ) a¼ Clusters the data and calculate agreement with cell type and batch
variable.
This method cluster the neighborhood graph (requires having run sc.pp.
neighbors first) with "clustering_method" algorithm multiple times with the
given resolutions, and return the best result in terms of ARI with cell
type.
Other metrics such as NMI with cell type, ARi with batch are logged but not
returned. (TODO: also return these metrics)
Args:
adata: the dataset to be clustered. adata.obsp shouhld contain the keys
'connectivities' and 'distances'.
resolutions: a list of leiden/louvain resolution parameters. Will
cluster with each resolution in the list and return the best result
(in terms of ARI with cell type).
clustering_method: Either "leiden" or "louvain".
cell_type_col: a key in adata.obs to the cell type column.
batch_col: a key in adata.obs to the batch column.
Returns:
best_cluster_key: a key in adata.obs to the best (in terms of ARI with
cell type) cluster assignment column.
best_ari: the best ARI with cell type.
best_nmi: the best NMI with cell type.
r z%Must specify at least one resolution.r ÚlouvainzDPlease specify louvain or leiden for the clustering method argument.z not in adata.obsNr¬ )Ú
resolutionZ key_addedr ) rR r r Útlr r½ Ú
ValueErrorrN r r r
rT )r r r r r Zclustering_funcZbest_resrf rg r¨ ri rA rB Zn_uniqueZ ari_batchÚarj rj rk rS Þ s. "
rS r= zumap.pdf)
r r r& r' r> r? r! r@ r* r+ c
C s t jj| ||d t jj| f|ddd|} |dk rltj |¡sRtd| d| jtj ||¡|dd |rt| S |
¡ t | ¡ dS )
aÁ Embeds, plots and optionally saves the neighborhood graph with UMAP.
Requires having run sc.pp.neighbors first.
Args:
adata: the dataset to draw. adata.obsp shouhld contain the keys
'connectivities' and 'distances'.
color_by: a str or a list of adata.obs keys to color the points in the
scatterplot by. E.g. if both cell_type_col and batch_col is in
color_by, then we would have two plots colored by cell type and
batch variables, respectively.
min_dist: The effective minimum distance between embedded points.
Smaller values will result in a more clustered/clumped embedding
where nearby points on the manifold are drawn closer together,
while larger values will result on a more even dispersal of points.
spread: The effective scale of embedded points. In combination with
`min_dist` this determines how clustered/clumped the embedded
points are.
ckpt_dir: where to save the plot. If None, do not save the plot.
fname: file name of the saved plot. Only used if ckpt_dir is not None.
return_fig: whether to return the Figure object. Useful for visualizing
the plot.
dpi: the dpi of the saved plot. Only used if ckpt_dir is not None.
umap_kwargs: other kwargs to pass to sc.pl.umap.
Returns:
If return_fig is True, return the figure containing the plot.
)r& r' FT)ÚcolorÚshowr! Nz ckpt_dir z does not exist.Ztight)r@ Z bbox_inches)
r r¿ r ÚplrZ r[ Úexistsr Zsavefigr\ ZclfÚpltÚclose)
r r r& r' r> r? r! r@ r* rI rj rj rk rc s ( þrc Úaggéx é
©rÊ rÊ ©Zmatplotlib_backendr@ ÚframeonÚvector_friendlyÚfontsizeÚfigsizec C s" t | ¡ tj|||||d dS )u¤ Set figure parameters.
Args
backend: the backend to switch to. This can either be one of th
standard backend names, which are case-insensitive:
- interactive backends:
GTK3Agg, GTK3Cairo, MacOSX, nbAgg,
Qt4Agg, Qt4Cairo, Qt5Agg, Qt5Cairo,
TkAgg, TkCairo, WebAgg, WX, WXAgg, WXCairo
- non-interactive backends:
agg, cairo, pdf, pgf, ps, svg, template
or a string of the form: ``module://my.module.name``.
dpi: resolution of rendered figures â this influences the size of
figures in notebooks.
frameon: add frames and axes labels to scatter plots.
vector_friendly: plot scatter plots using `png` backend even when
exporting as `pdf` or `svg`.
fontsize: the fontsize for several `rcParams` entries.
figsize: plt.rcParams['figure.figsize'].
)r@ rÐ rÏ rÍ rÎ N)Ú
matplotlibÚuser Úset_figure_paramsrÌ rj rj rk rÓ V s
rÓ )r r r T)r )r r r r r NT)r r r¸ r¸ r¹ r NT)r r r )rÈ rÉ TTrÊ rË )CÚmathr rZ ÚloggingÚnumpyrV Zscanpyr ZanndataÚadÚpandasrJ rÑ Zmatplotlib.figurer Úmatplotlib.pyplotÚpyplotrÆ Zscipy.sparse.csrr Z scipy.statsr Útypingr r r r r
Z scipy.sparser Zsklearn.metricsr r
r Zsklearn.neighborsr ZpsutilrW Ú cpu_countr rn Ú__annotations__Ú getLoggerÚ__name__r rd ZAnnDatarP ÚfloatÚboolr³ Ú RandomStateÚ Generatorrl rm rp r ÚndarrayrQ r_ r^ r® r· r] rS rc rÓ rj rj rj rk Ú<module> s
î
í î
í S üû " þþ
ø
÷ M
÷
ö 6 û ú Cø
÷ 7 úú
Datasets
Models
