markergenes=c('TM4SF1','KLF5','TFCP2L1','KRT17','ABCA3','CXCL14', 'SCGB3A2','SCGB1A1','SFTPC','MSMB',
'FOXJ1','PTPRC',"VWF",'PECAM1','PDGFRB','CD68','AGER','PDGFRA','HEY2','KRT5',"STC1","MFAP5",
"DCN","ACTA2","WNT2","AXIN2","SPOCK2",'WT1','BMX', 'CGRP', 'ASCL1','PROX1','MUC5AC','MUC5B','EPCAM')
immunegens <- c('PTPRC','CD68','PTPRC','LTB','CD69','CD79B','CD8B','CD8A','CD3G','CD27','CD2','CD96','CCL5','LAT','CD1E','CCL17','CCR6','CD1C','PLD4','CALB2','SLC18A2','HDC','SVOPL','KIT','FPR2','KLRF1','SH2D1B','MYOM2','TMIGD2','CD160','NCR3')
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.