---
title: "Практика 13"
output: html_document
date: "2023-11-24"
---

```{r setup, include=FALSE}
knitr::opts_chunk$set(echo = TRUE)
```


## Задание 1 

Установите и подгрузите пакет org.Hs.eg.db. 

С помощью него и функции `select()` из пакета AnnotationDbi переведите `ENSEMBL` идентификаторы генов в символьные названия (`SYMBOL`), а также достаньте из аннотации полные названия этих генов (`GENENAME`) и ассоциацию с заболеваниями по базе данных `OMIM`.


```{r}
ens_genes <- c("ENSG00000167107", "ENSG00000181798", "ENSG00000280639", "ENSG00000198218", "ENSG00000284269")
```


## Задание 2

Установите и подгрузите пакет bioMart. 

С помощью этого пакета добудьте информацию о GC-составе генов из списка.

```{r}
ens_genes <- c("ENSG00000167107", "ENSG00000181798", "ENSG00000280639", "ENSG00000198218", "ENSG00000284269")
```

