## ----echo=FALSE----------------------------------------------------------
library(GEOsearch)
library(org.Hs.eg.db)
library(org.Mm.eg.db)

## ------------------------------------------------------------------------
Oct4alias <- TermAlias("Oct4 RNA-seq")
Oct4alias

## ------------------------------------------------------------------------
Oct4searchres <- GEOSearchTerm(Oct4alias)
head(Oct4searchres)

## ------------------------------------------------------------------------
Oct4keywordfreq <- KeyWordFreq(Oct4searchres)
head(Oct4keywordfreq)

## ------------------------------------------------------------------------
SampleDetail(c("GSE69322","GSE64008"))