-
Notifications
You must be signed in to change notification settings - Fork 0
/
analise_dados_R_governo.R
1 lines (1 loc) · 74.2 KB
/
analise_dados_R_governo.R
1
{"nbformat":4,"nbformat_minor":0,"metadata":{"colab":{"provenance":[],"authorship_tag":"ABX9TyNUABi5dUGpGOzPrsOp2wGu"},"kernelspec":{"name":"ir","display_name":"R"},"language_info":{"name":"R"}},"cells":[{"cell_type":"code","source":["mensagem <- 'hello world'\n","print(mensagem)"],"metadata":{"id":"1pFQg1mMmtpv","colab":{"base_uri":"https://localhost:8080/"},"executionInfo":{"status":"ok","timestamp":1716161674012,"user_tz":180,"elapsed":733,"user":{"displayName":"BARBARA MALINOSKY COELHO DA ROSA","userId":"10444252567340631460"}},"outputId":"2e876a3e-6684-43a7-d2d4-4e306b92ecf9"},"execution_count":null,"outputs":[{"output_type":"stream","name":"stdout","text":["[1] \"hello world\"\n"]}]},{"cell_type":"code","source":["# Para pedir ajuda basta inserir a função help ououcolocar um ponto de interrogaçaão na frente do que se wier peocurarf\n","#Outras funções úteis\n","?head\n","?str\n","?getwd\n","?SD\n","?sum\n","?seq"],"metadata":{"id":"re7kwrrqmxIp"},"execution_count":null,"outputs":[]},{"cell_type":"code","source":["#Instalando um novo pacote\n","\n","#Instalando o pacote ggplot2\n","install.packages(\"ggplot2\")\n","\n","#Carregando o pacote ggplot2\n","library (ggplot2)"],"metadata":{"colab":{"base_uri":"https://localhost:8080/"},"id":"li-CNMlLbE8P","executionInfo":{"status":"ok","timestamp":1716161716889,"user_tz":180,"elapsed":23682,"user":{"displayName":"BARBARA MALINOSKY COELHO DA ROSA","userId":"10444252567340631460"}},"outputId":"db5e2f55-0de7-4820-8f4f-3732395631bc"},"execution_count":null,"outputs":[{"output_type":"stream","name":"stderr","text":["Installing package into ‘/usr/local/lib/R/site-library’\n","(as ‘lib’ is unspecified)\n","\n"]}]},{"cell_type":"code","source":["#Vetores\n","\n","#Criando um vetor\n","?c()\n","\n","cidade <-c(\"Brasília\",\n"," \"São Paulo\",\n"," \"Rio de Janeiro\",\n"," \"Porto Alegre\")\n","\n","#Visualizando os dados do vetor\n","cidade\n","\n","temperatura <-c(32,22,35,17)\n","\n","regiao <- c(1,2,2,3)\n","\n","#Acessando o primeiro elemento\n","cidade[1]\n","\n","#Acessando um intervalo de elementos\n","temperatura[1:3]\n","\n","#Copiando um vetor\n","cidade2 <- cidade\n","cidade2\n","\n","#Excluindo o segundo elemento da consulta\n","temperatura[-2]\n","\n","#Alterando um vetor\n","cidade2[3] <- \"Belo Horizonte\"\n","\n","#Adicionando um novo elemento\n","cidade2[5] <- \"Curitiba\"\n","cidade2"],"metadata":{"colab":{"base_uri":"https://localhost:8080/","height":119},"id":"UxSP8NcabGJh","executionInfo":{"status":"ok","timestamp":1716161769254,"user_tz":180,"elapsed":323,"user":{"displayName":"BARBARA MALINOSKY COELHO DA ROSA","userId":"10444252567340631460"}},"outputId":"5ea2377d-bfa2-433c-9038-47a2b9a8cb49"},"execution_count":null,"outputs":[{"output_type":"display_data","data":{"text/html":["<style>\n",".list-inline {list-style: none; margin:0; padding: 0}\n",".list-inline>li {display: inline-block}\n",".list-inline>li:not(:last-child)::after {content: \"\\00b7\"; padding: 0 .5ex}\n","</style>\n","<ol class=list-inline><li>'Brasília'</li><li>'São Paulo'</li><li>'Rio de Janeiro'</li><li>'Porto Alegre'</li></ol>\n"],"text/markdown":"1. 'Brasília'\n2. 'São Paulo'\n3. 'Rio de Janeiro'\n4. 'Porto Alegre'\n\n\n","text/latex":"\\begin{enumerate*}\n\\item 'Brasília'\n\\item 'São Paulo'\n\\item 'Rio de Janeiro'\n\\item 'Porto Alegre'\n\\end{enumerate*}\n","text/plain":["[1] \"Brasília\" \"São Paulo\" \"Rio de Janeiro\" \"Porto Alegre\" "]},"metadata":{}},{"output_type":"display_data","data":{"text/html":["'Brasília'"],"text/markdown":"'Brasília'","text/latex":"'Brasília'","text/plain":["[1] \"Brasília\""]},"metadata":{}},{"output_type":"display_data","data":{"text/html":["<style>\n",".list-inline {list-style: none; margin:0; padding: 0}\n",".list-inline>li {display: inline-block}\n",".list-inline>li:not(:last-child)::after {content: \"\\00b7\"; padding: 0 .5ex}\n","</style>\n","<ol class=list-inline><li>32</li><li>22</li><li>35</li></ol>\n"],"text/markdown":"1. 32\n2. 22\n3. 35\n\n\n","text/latex":"\\begin{enumerate*}\n\\item 32\n\\item 22\n\\item 35\n\\end{enumerate*}\n","text/plain":["[1] 32 22 35"]},"metadata":{}},{"output_type":"display_data","data":{"text/html":["<style>\n",".list-inline {list-style: none; margin:0; padding: 0}\n",".list-inline>li {display: inline-block}\n",".list-inline>li:not(:last-child)::after {content: \"\\00b7\"; padding: 0 .5ex}\n","</style>\n","<ol class=list-inline><li>'Brasília'</li><li>'São Paulo'</li><li>'Rio de Janeiro'</li><li>'Porto Alegre'</li></ol>\n"],"text/markdown":"1. 'Brasília'\n2. 'São Paulo'\n3. 'Rio de Janeiro'\n4. 'Porto Alegre'\n\n\n","text/latex":"\\begin{enumerate*}\n\\item 'Brasília'\n\\item 'São Paulo'\n\\item 'Rio de Janeiro'\n\\item 'Porto Alegre'\n\\end{enumerate*}\n","text/plain":["[1] \"Brasília\" \"São Paulo\" \"Rio de Janeiro\" \"Porto Alegre\" "]},"metadata":{}},{"output_type":"display_data","data":{"text/html":["<style>\n",".list-inline {list-style: none; margin:0; padding: 0}\n",".list-inline>li {display: inline-block}\n",".list-inline>li:not(:last-child)::after {content: \"\\00b7\"; padding: 0 .5ex}\n","</style>\n","<ol class=list-inline><li>32</li><li>35</li><li>17</li></ol>\n"],"text/markdown":"1. 32\n2. 35\n3. 17\n\n\n","text/latex":"\\begin{enumerate*}\n\\item 32\n\\item 35\n\\item 17\n\\end{enumerate*}\n","text/plain":["[1] 32 35 17"]},"metadata":{}},{"output_type":"display_data","data":{"text/html":["<style>\n",".list-inline {list-style: none; margin:0; padding: 0}\n",".list-inline>li {display: inline-block}\n",".list-inline>li:not(:last-child)::after {content: \"\\00b7\"; padding: 0 .5ex}\n","</style>\n","<ol class=list-inline><li>'Brasília'</li><li>'São Paulo'</li><li>'Belo Horizonte'</li><li>'Porto Alegre'</li><li>'Curitiba'</li></ol>\n"],"text/markdown":"1. 'Brasília'\n2. 'São Paulo'\n3. 'Belo Horizonte'\n4. 'Porto Alegre'\n5. 'Curitiba'\n\n\n","text/latex":"\\begin{enumerate*}\n\\item 'Brasília'\n\\item 'São Paulo'\n\\item 'Belo Horizonte'\n\\item 'Porto Alegre'\n\\item 'Curitiba'\n\\end{enumerate*}\n","text/plain":["[1] \"Brasília\" \"São Paulo\" \"Belo Horizonte\" \"Porto Alegre\" \n","[5] \"Curitiba\" "]},"metadata":{}}]},{"cell_type":"code","source":["#Fatores\n","?factor\n","\n","UF <- factor(c(\"DF\", \"SP\", \"RJ\", \"RS\"))\n","UF\n","\n","\n","grau.instrucao <- factor(c(\"Nível Médio\",\n"," \"Superior\",\n"," \"Nível Médio\",\n"," \"Fundamental\"),\n"," levels = c(\"Fundamental\",\n"," \"Nível Médio\",\n"," \"Superior\"),\n"," ordered = TRUE)\n","\n","grau.instrucao"],"metadata":{"id":"Mhc704DnbG9p","colab":{"base_uri":"https://localhost:8080/","height":101},"executionInfo":{"status":"ok","timestamp":1716162386329,"user_tz":180,"elapsed":1251,"user":{"displayName":"BARBARA MALINOSKY COELHO DA ROSA","userId":"10444252567340631460"}},"outputId":"dbaa136d-23df-4851-f9c7-dee218b1cae2"},"execution_count":null,"outputs":[{"output_type":"display_data","data":{"text/html":["<style>\n",".list-inline {list-style: none; margin:0; padding: 0}\n",".list-inline>li {display: inline-block}\n",".list-inline>li:not(:last-child)::after {content: \"\\00b7\"; padding: 0 .5ex}\n","</style>\n","<ol class=list-inline><li>DF</li><li>SP</li><li>RJ</li><li>RS</li></ol>\n","\n","<details>\n","\t<summary style=display:list-item;cursor:pointer>\n","\t\t<strong>Levels</strong>:\n","\t</summary>\n","\t<style>\n","\t.list-inline {list-style: none; margin:0; padding: 0}\n","\t.list-inline>li {display: inline-block}\n","\t.list-inline>li:not(:last-child)::after {content: \"\\00b7\"; padding: 0 .5ex}\n","\t</style>\n","\t<ol class=list-inline><li>'DF'</li><li>'RJ'</li><li>'RS'</li><li>'SP'</li></ol>\n","</details>"],"text/markdown":"1. DF\n2. SP\n3. RJ\n4. RS\n\n\n\n**Levels**: 1. 'DF'\n2. 'RJ'\n3. 'RS'\n4. 'SP'\n\n\n","text/latex":"\\begin{enumerate*}\n\\item DF\n\\item SP\n\\item RJ\n\\item RS\n\\end{enumerate*}\n\n\\emph{Levels}: \\begin{enumerate*}\n\\item 'DF'\n\\item 'RJ'\n\\item 'RS'\n\\item 'SP'\n\\end{enumerate*}\n","text/plain":["[1] DF SP RJ RS\n","Levels: DF RJ RS SP"]},"metadata":{}},{"output_type":"display_data","data":{"text/html":["<style>\n",".list-inline {list-style: none; margin:0; padding: 0}\n",".list-inline>li {display: inline-block}\n",".list-inline>li:not(:last-child)::after {content: \"\\00b7\"; padding: 0 .5ex}\n","</style>\n","<ol class=list-inline><li>Nível Médio</li><li>Superior</li><li>Nível Médio</li><li>Fundamental</li></ol>\n","\n","<details>\n","\t<summary style=display:list-item;cursor:pointer>\n","\t\t<strong>Levels</strong>:\n","\t</summary>\n","\t<style>\n","\t.list-inline {list-style: none; margin:0; padding: 0}\n","\t.list-inline>li {display: inline-block}\n","\t.list-inline>li:not(:last-child)::after {content: \"\\00b7\"; padding: 0 .5ex}\n","\t</style>\n","\t<ol class=list-inline><li>'Fundamental'</li><li>'Nível Médio'</li><li>'Superior'</li></ol>\n","</details>"],"text/markdown":"1. Nível Médio\n2. Superior\n3. Nível Médio\n4. Fundamental\n\n\n\n**Levels**: 1. 'Fundamental'\n2. 'Nível Médio'\n3. 'Superior'\n\n\n","text/latex":"\\begin{enumerate*}\n\\item Nível Médio\n\\item Superior\n\\item Nível Médio\n\\item Fundamental\n\\end{enumerate*}\n\n\\emph{Levels}: \\begin{enumerate*}\n\\item 'Fundamental'\n\\item 'Nível Médio'\n\\item 'Superior'\n\\end{enumerate*}\n","text/plain":["[1] Nível Médio Superior Nível Médio Fundamental\n","Levels: Fundamental < Nível Médio < Superior"]},"metadata":{}}]},{"cell_type":"code","source":["#Listas\n","?list()\n","\n","pessoa <- list(sexo = \"M\", cidade = \"Brasília\", idade = 20)\n","\n","pessoa\n","\n","#Acessando o primeiro elemento da lista\n","pessoa[1]\n","\n","#Acessando o valor do primeiro elemento da lista\n","pessoa[[1]]\n","\n","#Editando a lista\n","pessoa[[\"idade\"]] <- 22\n","pessoa\n","\n","#Deletando elemento da lista\n","pessoa[[\"idade\"]] <- NULL\n","pessoa\n","\n","#Criando novamente a lista\n","pessoa <- list(sexo = \"M\", cidade = \"Brasília\", idade = 20)\n","\n","#Filtrando elementos da lista\n","pessoa[c(\"cidade\", \"idade\")]\n","\n","#Lista de listas\n","cidades <- list(cidade = cidade,\n"," temperatura = temperatura,\n"," regiao = regiao)\n","cidades"],"metadata":{"id":"RJTRq8z6bHh3","colab":{"base_uri":"https://localhost:8080/","height":791},"executionInfo":{"status":"ok","timestamp":1716162471012,"user_tz":180,"elapsed":330,"user":{"displayName":"BARBARA MALINOSKY COELHO DA ROSA","userId":"10444252567340631460"}},"outputId":"3ed9fb45-8477-4b9d-9d43-d2450ad284ce"},"execution_count":null,"outputs":[{"output_type":"display_data","data":{"text/html":["<dl>\n","\t<dt>$sexo</dt>\n","\t\t<dd>'M'</dd>\n","\t<dt>$cidade</dt>\n","\t\t<dd>'Brasília'</dd>\n","\t<dt>$idade</dt>\n","\t\t<dd>20</dd>\n","</dl>\n"],"text/markdown":"$sexo\n: 'M'\n$cidade\n: 'Brasília'\n$idade\n: 20\n\n\n","text/latex":"\\begin{description}\n\\item[\\$sexo] 'M'\n\\item[\\$cidade] 'Brasília'\n\\item[\\$idade] 20\n\\end{description}\n","text/plain":["$sexo\n","[1] \"M\"\n","\n","$cidade\n","[1] \"Brasília\"\n","\n","$idade\n","[1] 20\n"]},"metadata":{}},{"output_type":"display_data","data":{"text/html":["<strong>$sexo</strong> = 'M'"],"text/markdown":"**$sexo** = 'M'","text/latex":"\\textbf{\\$sexo} = 'M'","text/plain":["$sexo\n","[1] \"M\"\n"]},"metadata":{}},{"output_type":"display_data","data":{"text/html":["'M'"],"text/markdown":"'M'","text/latex":"'M'","text/plain":["[1] \"M\""]},"metadata":{}},{"output_type":"display_data","data":{"text/html":["<dl>\n","\t<dt>$sexo</dt>\n","\t\t<dd>'M'</dd>\n","\t<dt>$cidade</dt>\n","\t\t<dd>'Brasília'</dd>\n","\t<dt>$idade</dt>\n","\t\t<dd>22</dd>\n","</dl>\n"],"text/markdown":"$sexo\n: 'M'\n$cidade\n: 'Brasília'\n$idade\n: 22\n\n\n","text/latex":"\\begin{description}\n\\item[\\$sexo] 'M'\n\\item[\\$cidade] 'Brasília'\n\\item[\\$idade] 22\n\\end{description}\n","text/plain":["$sexo\n","[1] \"M\"\n","\n","$cidade\n","[1] \"Brasília\"\n","\n","$idade\n","[1] 22\n"]},"metadata":{}},{"output_type":"display_data","data":{"text/html":["<dl>\n","\t<dt>$sexo</dt>\n","\t\t<dd>'M'</dd>\n","\t<dt>$cidade</dt>\n","\t\t<dd>'Brasília'</dd>\n","</dl>\n"],"text/markdown":"$sexo\n: 'M'\n$cidade\n: 'Brasília'\n\n\n","text/latex":"\\begin{description}\n\\item[\\$sexo] 'M'\n\\item[\\$cidade] 'Brasília'\n\\end{description}\n","text/plain":["$sexo\n","[1] \"M\"\n","\n","$cidade\n","[1] \"Brasília\"\n"]},"metadata":{}},{"output_type":"display_data","data":{"text/html":["<dl>\n","\t<dt>$cidade</dt>\n","\t\t<dd>'Brasília'</dd>\n","\t<dt>$idade</dt>\n","\t\t<dd>20</dd>\n","</dl>\n"],"text/markdown":"$cidade\n: 'Brasília'\n$idade\n: 20\n\n\n","text/latex":"\\begin{description}\n\\item[\\$cidade] 'Brasília'\n\\item[\\$idade] 20\n\\end{description}\n","text/plain":["$cidade\n","[1] \"Brasília\"\n","\n","$idade\n","[1] 20\n"]},"metadata":{}},{"output_type":"display_data","data":{"text/html":["<dl>\n","\t<dt>$cidade</dt>\n","\t\t<dd><style>\n",".list-inline {list-style: none; margin:0; padding: 0}\n",".list-inline>li {display: inline-block}\n",".list-inline>li:not(:last-child)::after {content: \"\\00b7\"; padding: 0 .5ex}\n","</style>\n","<ol class=list-inline><li>'Brasília'</li><li>'São Paulo'</li><li>'Rio de Janeiro'</li><li>'Porto Alegre'</li></ol>\n","</dd>\n","\t<dt>$temperatura</dt>\n","\t\t<dd><style>\n",".list-inline {list-style: none; margin:0; padding: 0}\n",".list-inline>li {display: inline-block}\n",".list-inline>li:not(:last-child)::after {content: \"\\00b7\"; padding: 0 .5ex}\n","</style>\n","<ol class=list-inline><li>32</li><li>22</li><li>35</li><li>17</li></ol>\n","</dd>\n","\t<dt>$regiao</dt>\n","\t\t<dd><style>\n",".list-inline {list-style: none; margin:0; padding: 0}\n",".list-inline>li {display: inline-block}\n",".list-inline>li:not(:last-child)::after {content: \"\\00b7\"; padding: 0 .5ex}\n","</style>\n","<ol class=list-inline><li>1</li><li>2</li><li>2</li><li>3</li></ol>\n","</dd>\n","</dl>\n"],"text/markdown":"$cidade\n: 1. 'Brasília'\n2. 'São Paulo'\n3. 'Rio de Janeiro'\n4. 'Porto Alegre'\n\n\n\n$temperatura\n: 1. 32\n2. 22\n3. 35\n4. 17\n\n\n\n$regiao\n: 1. 1\n2. 2\n3. 2\n4. 3\n\n\n\n\n\n","text/latex":"\\begin{description}\n\\item[\\$cidade] \\begin{enumerate*}\n\\item 'Brasília'\n\\item 'São Paulo'\n\\item 'Rio de Janeiro'\n\\item 'Porto Alegre'\n\\end{enumerate*}\n\n\\item[\\$temperatura] \\begin{enumerate*}\n\\item 32\n\\item 22\n\\item 35\n\\item 17\n\\end{enumerate*}\n\n\\item[\\$regiao] \\begin{enumerate*}\n\\item 1\n\\item 2\n\\item 2\n\\item 3\n\\end{enumerate*}\n\n\\end{description}\n","text/plain":["$cidade\n","[1] \"Brasília\" \"São Paulo\" \"Rio de Janeiro\" \"Porto Alegre\" \n","\n","$temperatura\n","[1] 32 22 35 17\n","\n","$regiao\n","[1] 1 2 2 3\n"]},"metadata":{}}]},{"cell_type":"code","source":["#Criando um data frame com vetores\n","\n","df <- data.frame(cidade,temperatura)\n","df\n","\n","df2 <- data.frame(cidades)\n","df2\n","\n","#Filtrando valores do data frame\n","#Recuperando o valor da linha 1, coluna 2\n","df[1,2]\n","\n","#Recuperando todas as linhas da primeira coluna\n","df[, 1]\n","\n","#Recuperando a Primeira linha e todas as colunas\n","df[1,]\n","\n","#Selecionando as 3 primeiras linhas da primeira e ultima coluna\n","df2[c(1:3), c(1,3)]\n","\n","#Verificando o nome das colunas\n","names(df)\n","\n","#Verificando numero de linhas x colunas\n","dim(df)\n","\n","#Verificando os tipos de dados\n","str(df)\n","\n","#Acessar uma coluna do dataframe\n","df$cidade\n","df['cidade']"],"metadata":{"id":"6fO8Qh0iAVKb","colab":{"base_uri":"https://localhost:8080/","height":1000},"executionInfo":{"status":"ok","timestamp":1716162503392,"user_tz":180,"elapsed":258,"user":{"displayName":"BARBARA MALINOSKY COELHO DA ROSA","userId":"10444252567340631460"}},"outputId":"fe613bde-482a-479a-961c-c2e4d7f332f6"},"execution_count":null,"outputs":[{"output_type":"display_data","data":{"text/html":["<table class=\"dataframe\">\n","<caption>A data.frame: 4 × 2</caption>\n","<thead>\n","\t<tr><th scope=col>cidade</th><th scope=col>temperatura</th></tr>\n","\t<tr><th scope=col><chr></th><th scope=col><dbl></th></tr>\n","</thead>\n","<tbody>\n","\t<tr><td>Brasília </td><td>32</td></tr>\n","\t<tr><td>São Paulo </td><td>22</td></tr>\n","\t<tr><td>Rio de Janeiro</td><td>35</td></tr>\n","\t<tr><td>Porto Alegre </td><td>17</td></tr>\n","</tbody>\n","</table>\n"],"text/markdown":"\nA data.frame: 4 × 2\n\n| cidade <chr> | temperatura <dbl> |\n|---|---|\n| Brasília | 32 |\n| São Paulo | 22 |\n| Rio de Janeiro | 35 |\n| Porto Alegre | 17 |\n\n","text/latex":"A data.frame: 4 × 2\n\\begin{tabular}{ll}\n cidade & temperatura\\\\\n <chr> & <dbl>\\\\\n\\hline\n\t Brasília & 32\\\\\n\t São Paulo & 22\\\\\n\t Rio de Janeiro & 35\\\\\n\t Porto Alegre & 17\\\\\n\\end{tabular}\n","text/plain":[" cidade temperatura\n","1 Brasília 32 \n","2 São Paulo 22 \n","3 Rio de Janeiro 35 \n","4 Porto Alegre 17 "]},"metadata":{}},{"output_type":"display_data","data":{"text/html":["<table class=\"dataframe\">\n","<caption>A data.frame: 4 × 3</caption>\n","<thead>\n","\t<tr><th scope=col>cidade</th><th scope=col>temperatura</th><th scope=col>regiao</th></tr>\n","\t<tr><th scope=col><chr></th><th scope=col><dbl></th><th scope=col><dbl></th></tr>\n","</thead>\n","<tbody>\n","\t<tr><td>Brasília </td><td>32</td><td>1</td></tr>\n","\t<tr><td>São Paulo </td><td>22</td><td>2</td></tr>\n","\t<tr><td>Rio de Janeiro</td><td>35</td><td>2</td></tr>\n","\t<tr><td>Porto Alegre </td><td>17</td><td>3</td></tr>\n","</tbody>\n","</table>\n"],"text/markdown":"\nA data.frame: 4 × 3\n\n| cidade <chr> | temperatura <dbl> | regiao <dbl> |\n|---|---|---|\n| Brasília | 32 | 1 |\n| São Paulo | 22 | 2 |\n| Rio de Janeiro | 35 | 2 |\n| Porto Alegre | 17 | 3 |\n\n","text/latex":"A data.frame: 4 × 3\n\\begin{tabular}{lll}\n cidade & temperatura & regiao\\\\\n <chr> & <dbl> & <dbl>\\\\\n\\hline\n\t Brasília & 32 & 1\\\\\n\t São Paulo & 22 & 2\\\\\n\t Rio de Janeiro & 35 & 2\\\\\n\t Porto Alegre & 17 & 3\\\\\n\\end{tabular}\n","text/plain":[" cidade temperatura regiao\n","1 Brasília 32 1 \n","2 São Paulo 22 2 \n","3 Rio de Janeiro 35 2 \n","4 Porto Alegre 17 3 "]},"metadata":{}},{"output_type":"display_data","data":{"text/html":["32"],"text/markdown":"32","text/latex":"32","text/plain":["[1] 32"]},"metadata":{}},{"output_type":"display_data","data":{"text/html":["<style>\n",".list-inline {list-style: none; margin:0; padding: 0}\n",".list-inline>li {display: inline-block}\n",".list-inline>li:not(:last-child)::after {content: \"\\00b7\"; padding: 0 .5ex}\n","</style>\n","<ol class=list-inline><li>'Brasília'</li><li>'São Paulo'</li><li>'Rio de Janeiro'</li><li>'Porto Alegre'</li></ol>\n"],"text/markdown":"1. 'Brasília'\n2. 'São Paulo'\n3. 'Rio de Janeiro'\n4. 'Porto Alegre'\n\n\n","text/latex":"\\begin{enumerate*}\n\\item 'Brasília'\n\\item 'São Paulo'\n\\item 'Rio de Janeiro'\n\\item 'Porto Alegre'\n\\end{enumerate*}\n","text/plain":["[1] \"Brasília\" \"São Paulo\" \"Rio de Janeiro\" \"Porto Alegre\" "]},"metadata":{}},{"output_type":"display_data","data":{"text/html":["<table class=\"dataframe\">\n","<caption>A data.frame: 1 × 2</caption>\n","<thead>\n","\t<tr><th></th><th scope=col>cidade</th><th scope=col>temperatura</th></tr>\n","\t<tr><th></th><th scope=col><chr></th><th scope=col><dbl></th></tr>\n","</thead>\n","<tbody>\n","\t<tr><th scope=row>1</th><td>Brasília</td><td>32</td></tr>\n","</tbody>\n","</table>\n"],"text/markdown":"\nA data.frame: 1 × 2\n\n| <!--/--> | cidade <chr> | temperatura <dbl> |\n|---|---|---|\n| 1 | Brasília | 32 |\n\n","text/latex":"A data.frame: 1 × 2\n\\begin{tabular}{r|ll}\n & cidade & temperatura\\\\\n & <chr> & <dbl>\\\\\n\\hline\n\t1 & Brasília & 32\\\\\n\\end{tabular}\n","text/plain":[" cidade temperatura\n","1 Brasília 32 "]},"metadata":{}},{"output_type":"display_data","data":{"text/html":["<table class=\"dataframe\">\n","<caption>A data.frame: 3 × 2</caption>\n","<thead>\n","\t<tr><th></th><th scope=col>cidade</th><th scope=col>regiao</th></tr>\n","\t<tr><th></th><th scope=col><chr></th><th scope=col><dbl></th></tr>\n","</thead>\n","<tbody>\n","\t<tr><th scope=row>1</th><td>Brasília </td><td>1</td></tr>\n","\t<tr><th scope=row>2</th><td>São Paulo </td><td>2</td></tr>\n","\t<tr><th scope=row>3</th><td>Rio de Janeiro</td><td>2</td></tr>\n","</tbody>\n","</table>\n"],"text/markdown":"\nA data.frame: 3 × 2\n\n| <!--/--> | cidade <chr> | regiao <dbl> |\n|---|---|---|\n| 1 | Brasília | 1 |\n| 2 | São Paulo | 2 |\n| 3 | Rio de Janeiro | 2 |\n\n","text/latex":"A data.frame: 3 × 2\n\\begin{tabular}{r|ll}\n & cidade & regiao\\\\\n & <chr> & <dbl>\\\\\n\\hline\n\t1 & Brasília & 1\\\\\n\t2 & São Paulo & 2\\\\\n\t3 & Rio de Janeiro & 2\\\\\n\\end{tabular}\n","text/plain":[" cidade regiao\n","1 Brasília 1 \n","2 São Paulo 2 \n","3 Rio de Janeiro 2 "]},"metadata":{}},{"output_type":"display_data","data":{"text/html":["<style>\n",".list-inline {list-style: none; margin:0; padding: 0}\n",".list-inline>li {display: inline-block}\n",".list-inline>li:not(:last-child)::after {content: \"\\00b7\"; padding: 0 .5ex}\n","</style>\n","<ol class=list-inline><li>'cidade'</li><li>'temperatura'</li></ol>\n"],"text/markdown":"1. 'cidade'\n2. 'temperatura'\n\n\n","text/latex":"\\begin{enumerate*}\n\\item 'cidade'\n\\item 'temperatura'\n\\end{enumerate*}\n","text/plain":["[1] \"cidade\" \"temperatura\""]},"metadata":{}},{"output_type":"display_data","data":{"text/html":["<style>\n",".list-inline {list-style: none; margin:0; padding: 0}\n",".list-inline>li {display: inline-block}\n",".list-inline>li:not(:last-child)::after {content: \"\\00b7\"; padding: 0 .5ex}\n","</style>\n","<ol class=list-inline><li>4</li><li>2</li></ol>\n"],"text/markdown":"1. 4\n2. 2\n\n\n","text/latex":"\\begin{enumerate*}\n\\item 4\n\\item 2\n\\end{enumerate*}\n","text/plain":["[1] 4 2"]},"metadata":{}},{"output_type":"stream","name":"stdout","text":["'data.frame':\t4 obs. of 2 variables:\n"," $ cidade : chr \"Brasília\" \"São Paulo\" \"Rio de Janeiro\" \"Porto Alegre\"\n"," $ temperatura: num 32 22 35 17\n"]},{"output_type":"display_data","data":{"text/html":["<style>\n",".list-inline {list-style: none; margin:0; padding: 0}\n",".list-inline>li {display: inline-block}\n",".list-inline>li:not(:last-child)::after {content: \"\\00b7\"; padding: 0 .5ex}\n","</style>\n","<ol class=list-inline><li>'Brasília'</li><li>'São Paulo'</li><li>'Rio de Janeiro'</li><li>'Porto Alegre'</li></ol>\n"],"text/markdown":"1. 'Brasília'\n2. 'São Paulo'\n3. 'Rio de Janeiro'\n4. 'Porto Alegre'\n\n\n","text/latex":"\\begin{enumerate*}\n\\item 'Brasília'\n\\item 'São Paulo'\n\\item 'Rio de Janeiro'\n\\item 'Porto Alegre'\n\\end{enumerate*}\n","text/plain":["[1] \"Brasília\" \"São Paulo\" \"Rio de Janeiro\" \"Porto Alegre\" "]},"metadata":{}},{"output_type":"display_data","data":{"text/html":["<table class=\"dataframe\">\n","<caption>A data.frame: 4 × 1</caption>\n","<thead>\n","\t<tr><th scope=col>cidade</th></tr>\n","\t<tr><th scope=col><chr></th></tr>\n","</thead>\n","<tbody>\n","\t<tr><td>Brasília </td></tr>\n","\t<tr><td>São Paulo </td></tr>\n","\t<tr><td>Rio de Janeiro</td></tr>\n","\t<tr><td>Porto Alegre </td></tr>\n","</tbody>\n","</table>\n"],"text/markdown":"\nA data.frame: 4 × 1\n\n| cidade <chr> |\n|---|\n| Brasília |\n| São Paulo |\n| Rio de Janeiro |\n| Porto Alegre |\n\n","text/latex":"A data.frame: 4 × 1\n\\begin{tabular}{l}\n cidade\\\\\n <chr>\\\\\n\\hline\n\t Brasília \\\\\n\t São Paulo \\\\\n\t Rio de Janeiro\\\\\n\t Porto Alegre \\\\\n\\end{tabular}\n","text/plain":[" cidade \n","1 Brasília \n","2 São Paulo \n","3 Rio de Janeiro\n","4 Porto Alegre "]},"metadata":{}}]},{"cell_type":"code","source":["?matrix()\n","\n","#Matrizes\n","\n","#Criando uma matriz\n","m <- matrix(seq(1:9), nrow = 3)\n","m\n","\n","m2 <- matrix(seq(1:25),\n"," ncol = 5,\n"," byrow = TRUE,\n"," dimnames = list(c(seq(1:5)),\n"," c('A','B','C','D','E'))\n"," )\n","m2\n","\n","#Filtrando a matriz\n","m2[c(1:2), c(\"B\",\"C\")]"],"metadata":{"id":"KLo2JpqdjNUj"},"execution_count":null,"outputs":[]},{"cell_type":"code","source":["#Loops\n","\n","#For\n","\n","# for (valor in sequencia){\n","# código...\n","# }\n","\n","?seq\n","\n","#Exemplo for\n","for (i in seq(12)){\n"," print(i)\n","}"],"metadata":{"id":"0yo4sHxKjNng","colab":{"base_uri":"https://localhost:8080/"},"executionInfo":{"status":"ok","timestamp":1716162535919,"user_tz":180,"elapsed":301,"user":{"displayName":"BARBARA MALINOSKY COELHO DA ROSA","userId":"10444252567340631460"}},"outputId":"ad07f966-1a6c-46a9-f151-aa2ad3095721"},"execution_count":null,"outputs":[{"output_type":"stream","name":"stdout","text":["[1] 1\n","[1] 2\n","[1] 3\n","[1] 4\n","[1] 5\n","[1] 6\n","[1] 7\n","[1] 8\n","[1] 9\n","[1] 10\n","[1] 11\n","[1] 12\n"]}]},{"cell_type":"code","source":["#While\n","\n","# while(condição){\n","# código...\n","# }\n","\n","#Exemplo while\n","\n","i <- 0\n","while(i <= 10){\n"," print(i)\n"," i = i+1\n","}"],"metadata":{"id":"chEge8u-kVkY","colab":{"base_uri":"https://localhost:8080/"},"executionInfo":{"status":"ok","timestamp":1716162544140,"user_tz":180,"elapsed":303,"user":{"displayName":"BARBARA MALINOSKY COELHO DA ROSA","userId":"10444252567340631460"}},"outputId":"730d2eb2-39b1-4c5e-953e-80410d0d75b4"},"execution_count":null,"outputs":[{"output_type":"stream","name":"stdout","text":["[1] 0\n","[1] 1\n","[1] 2\n","[1] 3\n","[1] 4\n","[1] 5\n","[1] 6\n","[1] 7\n","[1] 8\n","[1] 9\n","[1] 10\n"]}]},{"cell_type":"code","source":["#Controle de fluxo\n","\n","# if(condição){}\n","# código...\n","# }\n","\n","#Exemplo - Controle de fluxo\n","\n","x = 10\n","if (x > 0){\n"," print(\"Número Positivo\")\n","}\n","\n","nota = 4\n","if (nota >=7){\n"," print(\"Aprovado\")\n","}else if (nota > 5 && nota < 7){\n"," print(\"Recuperação\")\n","}else{\n"," print(\"Reprovado\")\n","}\n"],"metadata":{"id":"GD0WkIk4kWct","colab":{"base_uri":"https://localhost:8080/"},"executionInfo":{"status":"ok","timestamp":1716162550065,"user_tz":180,"elapsed":257,"user":{"displayName":"BARBARA MALINOSKY COELHO DA ROSA","userId":"10444252567340631460"}},"outputId":"920cb0e8-0cbe-48eb-9cdf-4a98df9a2c2a"},"execution_count":null,"outputs":[{"output_type":"stream","name":"stdout","text":["[1] \"Número Positivo\"\n","[1] \"Reprovado\"\n"]}]},{"cell_type":"code","source":["#Estrutura da função\n","\n","# nome.funcao <- function(argumento){\n","# código\n","# }\n","\n","#Criando a função\n","par.impar <- function(num){\n"," if((num %% 2) == 0){\n"," return(\"Par\")\n"," }else\n"," return(\"Ímpar\")\n","}\n","\n","#Usando a função\n","num = 3\n","par.impar(num)\n"],"metadata":{"id":"lL8o6nCKkW7S","colab":{"base_uri":"https://localhost:8080/","height":34},"executionInfo":{"status":"ok","timestamp":1716162557248,"user_tz":180,"elapsed":262,"user":{"displayName":"BARBARA MALINOSKY COELHO DA ROSA","userId":"10444252567340631460"}},"outputId":"3fe6ac19-9fa7-4ace-b82c-4c048bbe33df"},"execution_count":null,"outputs":[{"output_type":"display_data","data":{"text/html":["'Ímpar'"],"text/markdown":"'Ímpar'","text/latex":"'Ímpar'","text/plain":["[1] \"Ímpar\""]},"metadata":{}}]},{"cell_type":"code","source":["#Apply()\n","?apply\n","\n","x <- seq(1:9)\n","x\n","\n","matriz <- matrix(x, ncol = 3)\n","matriz\n","\n","result1 <- apply(matriz, 1, sum)\n","result1\n","\n","result2 <- apply(matriz, 2, sum)\n","result2\n","\n","?list\n","\n","numeros.p <- c(2,4,6,8,10,12)\n","numeros.i <- c(1,3,5,7,9,11)\n","numeros <- list(numeros.p,numeros.i)\n","\n","numeros\n","\n","?lapply\n","lapply(numeros, mean)\n","\n","?sapplt"],"metadata":{"id":"AKlseuI1jN2Z","colab":{"base_uri":"https://localhost:8080/","height":346},"executionInfo":{"status":"ok","timestamp":1716162565401,"user_tz":180,"elapsed":1010,"user":{"displayName":"BARBARA MALINOSKY COELHO DA ROSA","userId":"10444252567340631460"}},"outputId":"148b05c1-49a4-4c6f-99e7-4a0b9424c92c"},"execution_count":null,"outputs":[{"output_type":"display_data","data":{"text/html":["<style>\n",".list-inline {list-style: none; margin:0; padding: 0}\n",".list-inline>li {display: inline-block}\n",".list-inline>li:not(:last-child)::after {content: \"\\00b7\"; padding: 0 .5ex}\n","</style>\n","<ol class=list-inline><li>1</li><li>2</li><li>3</li><li>4</li><li>5</li><li>6</li><li>7</li><li>8</li><li>9</li></ol>\n"],"text/markdown":"1. 1\n2. 2\n3. 3\n4. 4\n5. 5\n6. 6\n7. 7\n8. 8\n9. 9\n\n\n","text/latex":"\\begin{enumerate*}\n\\item 1\n\\item 2\n\\item 3\n\\item 4\n\\item 5\n\\item 6\n\\item 7\n\\item 8\n\\item 9\n\\end{enumerate*}\n","text/plain":["[1] 1 2 3 4 5 6 7 8 9"]},"metadata":{}},{"output_type":"display_data","data":{"text/html":["<table class=\"dataframe\">\n","<caption>A matrix: 3 × 3 of type int</caption>\n","<tbody>\n","\t<tr><td>1</td><td>4</td><td>7</td></tr>\n","\t<tr><td>2</td><td>5</td><td>8</td></tr>\n","\t<tr><td>3</td><td>6</td><td>9</td></tr>\n","</tbody>\n","</table>\n"],"text/markdown":"\nA matrix: 3 × 3 of type int\n\n| 1 | 4 | 7 |\n| 2 | 5 | 8 |\n| 3 | 6 | 9 |\n\n","text/latex":"A matrix: 3 × 3 of type int\n\\begin{tabular}{lll}\n\t 1 & 4 & 7\\\\\n\t 2 & 5 & 8\\\\\n\t 3 & 6 & 9\\\\\n\\end{tabular}\n","text/plain":[" [,1] [,2] [,3]\n","[1,] 1 4 7 \n","[2,] 2 5 8 \n","[3,] 3 6 9 "]},"metadata":{}},{"output_type":"display_data","data":{"text/html":["<style>\n",".list-inline {list-style: none; margin:0; padding: 0}\n",".list-inline>li {display: inline-block}\n",".list-inline>li:not(:last-child)::after {content: \"\\00b7\"; padding: 0 .5ex}\n","</style>\n","<ol class=list-inline><li>12</li><li>15</li><li>18</li></ol>\n"],"text/markdown":"1. 12\n2. 15\n3. 18\n\n\n","text/latex":"\\begin{enumerate*}\n\\item 12\n\\item 15\n\\item 18\n\\end{enumerate*}\n","text/plain":["[1] 12 15 18"]},"metadata":{}},{"output_type":"display_data","data":{"text/html":["<style>\n",".list-inline {list-style: none; margin:0; padding: 0}\n",".list-inline>li {display: inline-block}\n",".list-inline>li:not(:last-child)::after {content: \"\\00b7\"; padding: 0 .5ex}\n","</style>\n","<ol class=list-inline><li>6</li><li>15</li><li>24</li></ol>\n"],"text/markdown":"1. 6\n2. 15\n3. 24\n\n\n","text/latex":"\\begin{enumerate*}\n\\item 6\n\\item 15\n\\item 24\n\\end{enumerate*}\n","text/plain":["[1] 6 15 24"]},"metadata":{}},{"output_type":"display_data","data":{"text/html":["<ol>\n","\t<li><style>\n",".list-inline {list-style: none; margin:0; padding: 0}\n",".list-inline>li {display: inline-block}\n",".list-inline>li:not(:last-child)::after {content: \"\\00b7\"; padding: 0 .5ex}\n","</style>\n","<ol class=list-inline><li>2</li><li>4</li><li>6</li><li>8</li><li>10</li><li>12</li></ol>\n","</li>\n","\t<li><style>\n",".list-inline {list-style: none; margin:0; padding: 0}\n",".list-inline>li {display: inline-block}\n",".list-inline>li:not(:last-child)::after {content: \"\\00b7\"; padding: 0 .5ex}\n","</style>\n","<ol class=list-inline><li>1</li><li>3</li><li>5</li><li>7</li><li>9</li><li>11</li></ol>\n","</li>\n","</ol>\n"],"text/markdown":"1. 1. 2\n2. 4\n3. 6\n4. 8\n5. 10\n6. 12\n\n\n\n2. 1. 1\n2. 3\n3. 5\n4. 7\n5. 9\n6. 11\n\n\n\n\n\n","text/latex":"\\begin{enumerate}\n\\item \\begin{enumerate*}\n\\item 2\n\\item 4\n\\item 6\n\\item 8\n\\item 10\n\\item 12\n\\end{enumerate*}\n\n\\item \\begin{enumerate*}\n\\item 1\n\\item 3\n\\item 5\n\\item 7\n\\item 9\n\\item 11\n\\end{enumerate*}\n\n\\end{enumerate}\n","text/plain":["[[1]]\n","[1] 2 4 6 8 10 12\n","\n","[[2]]\n","[1] 1 3 5 7 9 11\n"]},"metadata":{}},{"output_type":"display_data","data":{"text/html":["<ol>\n","\t<li>7</li>\n","\t<li>6</li>\n","</ol>\n"],"text/markdown":"1. 7\n2. 6\n\n\n","text/latex":"\\begin{enumerate}\n\\item 7\n\\item 6\n\\end{enumerate}\n","text/plain":["[[1]]\n","[1] 7\n","\n","[[2]]\n","[1] 6\n"]},"metadata":{}}]},{"cell_type":"code","source":["#Graficos\n","\n","#dataset/conjunto de dados\n","?mtcars\n","\n","#Filtrando colunas do dataset\n","carros <- mtcars[,c(1,2,9)]\n","\n","#Visualizando o dataset\n","head(carros)\n","\n","#Histograma\n","hist(carros$mpg)\n","\n","#Gráfico de dispersão\n","plot(carros$mpg,carros$cyl)\n","\n","install.packages(\"ggplot2\")\n","library(ggplot2)\n","\n","#Criando gráfico de barras com ggplot2\n","ggplot(carros,aes(am))+\n"," geom_bar()"],"metadata":{"id":"5tkkd72ei8aW","colab":{"base_uri":"https://localhost:8080/","height":1000},"executionInfo":{"status":"ok","timestamp":1716162603190,"user_tz":180,"elapsed":22261,"user":{"displayName":"BARBARA MALINOSKY COELHO DA ROSA","userId":"10444252567340631460"}},"outputId":"51ca48ea-e878-4aa4-f6cb-a78c247602ae"},"execution_count":null,"outputs":[{"output_type":"display_data","data":{"text/html":["<table class=\"dataframe\">\n","<caption>A data.frame: 6 × 3</caption>\n","<thead>\n","\t<tr><th></th><th scope=col>mpg</th><th scope=col>cyl</th><th scope=col>am</th></tr>\n","\t<tr><th></th><th scope=col><dbl></th><th scope=col><dbl></th><th scope=col><dbl></th></tr>\n","</thead>\n","<tbody>\n","\t<tr><th scope=row>Mazda RX4</th><td>21.0</td><td>6</td><td>1</td></tr>\n","\t<tr><th scope=row>Mazda RX4 Wag</th><td>21.0</td><td>6</td><td>1</td></tr>\n","\t<tr><th scope=row>Datsun 710</th><td>22.8</td><td>4</td><td>1</td></tr>\n","\t<tr><th scope=row>Hornet 4 Drive</th><td>21.4</td><td>6</td><td>0</td></tr>\n","\t<tr><th scope=row>Hornet Sportabout</th><td>18.7</td><td>8</td><td>0</td></tr>\n","\t<tr><th scope=row>Valiant</th><td>18.1</td><td>6</td><td>0</td></tr>\n","</tbody>\n","</table>\n"],"text/markdown":"\nA data.frame: 6 × 3\n\n| <!--/--> | mpg <dbl> | cyl <dbl> | am <dbl> |\n|---|---|---|---|\n| Mazda RX4 | 21.0 | 6 | 1 |\n| Mazda RX4 Wag | 21.0 | 6 | 1 |\n| Datsun 710 | 22.8 | 4 | 1 |\n| Hornet 4 Drive | 21.4 | 6 | 0 |\n| Hornet Sportabout | 18.7 | 8 | 0 |\n| Valiant | 18.1 | 6 | 0 |\n\n","text/latex":"A data.frame: 6 × 3\n\\begin{tabular}{r|lll}\n & mpg & cyl & am\\\\\n & <dbl> & <dbl> & <dbl>\\\\\n\\hline\n\tMazda RX4 & 21.0 & 6 & 1\\\\\n\tMazda RX4 Wag & 21.0 & 6 & 1\\\\\n\tDatsun 710 & 22.8 & 4 & 1\\\\\n\tHornet 4 Drive & 21.4 & 6 & 0\\\\\n\tHornet Sportabout & 18.7 & 8 & 0\\\\\n\tValiant & 18.1 & 6 & 0\\\\\n\\end{tabular}\n","text/plain":[" mpg cyl am\n","Mazda RX4 21.0 6 1 \n","Mazda RX4 Wag 21.0 6 1 \n","Datsun 710 22.8 4 1 \n","Hornet 4 Drive 21.4 6 0 \n","Hornet Sportabout 18.7 8 0 \n","Valiant 18.1 6 0 "]},"metadata":{}},{"output_type":"display_data","data":{"text/plain":["Plot with title “Histogram of carros$mpg”"],"image/png":"iVBORw0KGgoAAAANSUhEUgAAA0gAAANICAMAAADKOT/pAAADAFBMVEUAAAABAQECAgIDAwME\nBAQFBQUGBgYHBwcICAgJCQkKCgoLCwsMDAwNDQ0ODg4PDw8QEBARERESEhITExMUFBQVFRUW\nFhYXFxcYGBgZGRkaGhobGxscHBwdHR0eHh4fHx8gICAhISEiIiIjIyMkJCQlJSUmJiYnJyco\nKCgpKSkqKiorKyssLCwtLS0uLi4vLy8wMDAxMTEyMjIzMzM0NDQ1NTU2NjY3Nzc4ODg5OTk6\nOjo7Ozs8PDw9PT0+Pj4/Pz9AQEBBQUFCQkJDQ0NERERFRUVGRkZHR0dISEhJSUlKSkpLS0tM\nTExNTU1OTk5PT09QUFBRUVFSUlJTU1NUVFRVVVVWVlZXV1dYWFhZWVlaWlpbW1tcXFxdXV1e\nXl5fX19gYGBhYWFiYmJjY2NkZGRlZWVmZmZnZ2doaGhpaWlqampra2tsbGxtbW1ubm5vb29w\ncHBxcXFycnJzc3N0dHR1dXV2dnZ3d3d4eHh5eXl6enp7e3t8fHx9fX1+fn5/f3+AgICBgYGC\ngoKDg4OEhISFhYWGhoaHh4eIiIiJiYmKioqLi4uMjIyNjY2Ojo6Pj4+QkJCRkZGSkpKTk5OU\nlJSVlZWWlpaXl5eYmJiZmZmampqbm5ucnJydnZ2enp6fn5+goKChoaGioqKjo6OkpKSlpaWm\npqanp6eoqKipqamqqqqrq6usrKytra2urq6vr6+wsLCxsbGysrKzs7O0tLS1tbW2tra3t7e4\nuLi5ubm6urq7u7u8vLy9vb2+vr6/v7/AwMDBwcHCwsLDw8PExMTFxcXGxsbHx8fIyMjJycnK\nysrLy8vMzMzNzc3Ozs7Pz8/Q0NDR0dHS0tLT09PU1NTV1dXW1tbX19fY2NjZ2dna2trb29vc\n3Nzd3d3e3t7f39/g4ODh4eHi4uLj4+Pk5OTl5eXm5ubn5+fo6Ojp6enq6urr6+vs7Ozt7e3u\n7u7v7+/w8PDx8fHy8vLz8/P09PT19fX29vb39/f4+Pj5+fn6+vr7+/v8/Pz9/f3+/v7////i\nsF19AAAACXBIWXMAABJ0AAASdAHeZh94AAAgAElEQVR4nO3dCXxU5b3G8TckQwirKJsIBLVe\nWquCW9UWqxbcQNRWr4obCNYNBVrtRWsVtVVbvNV6rXtdqlXrXtteNy6ida9ga0Vsi2jrgoga\nRBEhhJx7zkwymUxyRpk8yX847+/7+dxkQoZ58t6TX7MQwQUA2sxZvwFAEhASIEBIgAAhAQKE\nBAgQEiBASIAAIQEChAQIEBIgQEiAACEBAoQECBASIEBIgAAhAQKEBAgQEiBASIAAIQEChAQI\nEBIgQEiAACEBAoQECBASIEBIgAAhAQKEBAgQEiBASIAAIQEChAQIEBIgQEiAACEBAoQECBAS\nIEBIgAAhtcXdzlWajd+1Q5eqLVa1xyP3v6k9HjXZCGk9XO+cW565Ocq5fW1Des5FPlE/7Hv/\ntU2VKx9w2Hz1AyccIa2HFiEtuuyyK1rca2m5e7UD3pgTnet12S214kd9ta/LSP1B/MgJR0jr\noUVIrfof1yEh7e/cifpH3cu5Pj/ose8Q5/q3y2eNiUVI6+GLhfSNjgkpfAtOlz/oR2XOLQy/\nRnpvY+d+K3/0JCOk9RD7NdLaa0f1rei700XvB8HYzGdG08JfXXHhLr1T/fa5sS7zW27csevG\nY194PXzlZ0Fwg3PfXDu1T78gqL9jn74VPb72P9G9wl/dPbh7RFX12bXBwnEbddt7Qe587uOd\n2PAZWNPXSG9/7ytdu2w9Y1l0O+8xM0tNk3lvWc5bv9i5qvQ3G84cPfVPrb85v3Ju6+DOb/Ts\nMfrpVs7lLUJaD3Eh1e7Z8G69xWs5If11s4Zf3e2D6Hd8L3278srwSfjS7c5t93PnyoPgqIZ7\nHVAfBL91bpu7yqKXprzeJ3rW96Om9WaP1yKkx3plfqH/34Lmj5ldapps/pblvvUrwvE52e/a\ntfrm/Ma5gZek71/xSMtzecvrw6+vuJCudu7Ldzzz8CHO7RG88kB4p9uefD2oCd9bN7/6dzMq\nnBsb3ufP4S+PuP7Wr3dPvytHv3Po4NSIYcEfnOt01cs3hPe6K/2rmw468NSwicr9B07bJfwt\nl2XHmz/ea0/u5NwRTz65ruG174afi+1xz29GODdsbYvHzCxlb+S9ZblvffR5aerYHtdkHrTV\nN+fO8KXKCXdcFB6kurbFubxFSOvheperKaSJzv08fFY7/tSfrgvedZmvkc53ruc74fNbw5fn\nBcEJzm0U/u//qupsSG6rt8Ibvxw7Nvo08EDnjs386n8Gwb3hsy6LgzXDnBuXHc97vLyvkc5y\nrs+nQbCsyrl7Wj5meil7I++Rmr31f66Kjla240+WBzFvTvSLk4L0hyv3SItzeYuQ1kNcSFOd\nG3LL0oY7NYY03LmJ0ct1vZ27IAi2du6Y6MVzmkK6PeehT3Nun8yv/jl8n650bnz4i2eE/2Of\nvUfe4+WFtI1zx0fPn37ooUUtHzO9lL2R90jN3vrgL1/PnK73TTFvTvSLfw1fWtvDufNanMtb\nhLQeopAGV6d1yQ3pL12jd70tJ98bffHeEFJ9ReZ/6INgt/S7YXiXi6KX7mkKKfPOO/ugLSrT\n77qjMr8afdd5kHMXh8/Cr2i2bNzOf7zmIdWXZ35Hg/zHTC813sh/pGZvfeiFmV3SH5Uebf3N\nCX8xlf6EcnvnjmtxLm8R0nqI/a7d3K9m/md86DPZkFaGz65N33V0+EV/UB++eHn00sPZkMrT\n745Xha/o9pXhfRrf6dOPt6VzV4fPrsgJKe/x8kKKXntN9qX8x8wsNd5o8Ui5b31a/8tvDL+M\n2qv1Nyf8xY3S9xrp3OEtzuUtQloP8T8iVP/MBftF3zbruzL3I9Il6deFX6QfFQSVDR8y7s6G\nlP6dn4T/i35k+L/6p3xeSPmP1zykdZ0aP8rEPmb2RotHyn3rg3eWpb/9/YRz3WNDyjze9umv\nlfLO5S1CWg+Ff9au7oHwa44Hs18jjWh4L60Nv5b4WRB8qeFriR81D+lP4b3/knm8wiHlP17e\n10jDGr5Guu3HP36o9cdsupH/SDlv/S8GuHPSIb0fvZlxIbnoy7C13dNfYeWdy1uEtB5iQlp1\n0cQD05887ePc/cHS8E5Phi9cEH56FX2P7Lrwy41/BMHRzvV6P/xoMbh5SLMzX8+/En5E+Wbh\nkPIeLy+k7znX56MgqAlruL71x2y60fyRmr31vws/LL0bhXS7c1vFh3RmkPle3mMtzuUtQloP\ncR+Rwv+JP+TBeX86P+Uq3wvqUs7tftcjwfLwS/QvXXnvDyozHyvmhL93u5tv2Llb85DeCd/b\nx738+83Cjyg9n32vUEh5j5cX0r/Djy673Hnbjs4NWdn6YzaFlPdIuW/96i87N+CMnodN7hJ9\nSy4upIrUzLlXbeLcsLoW5/IWIa2HuJBeHtTwHfFONwTpnyZN/0ln9ucHvpP+0ZkJ6dtdf9Y8\npOh71KGBbwwMn84sFFL+4+X9rN0fu2ZeOeCvMY+Z83lo80dq9ta/0rvxu/v7rYkNqfeZ6Xt0\nebrlubxFSOsh9mukpT/eqX+q65dPeCl64e2DN+qy+YXhjRU/2blXatNv/z7zO9ZdMqyy36F/\nezDzW7Lv1bU/27pqs+PfCWYPqxj024Ih5T1e/g+tvn7yVlVVXz3r/bjHzP2CrvkjNXvr3/n+\nV6pceZ99bl0X85lm+IvdgmtHdOl94EutnMtbhNTBfh1+qLB+Gz5Pwf9CNuY/ZtwQztWeCKmD\nLLz4lCPWBumf2znY+m35POMfLfDKvJA2pHO1J0LqIIvKwve0x5+aHn52WOjdtPTlhZSYc7UR\nIXWU8xq/ij/H+i1pm/xP7ZJyrjYipA4z59BBqcrqwx+3fjvaqMXXSAk5VxsREiBASIAAIQEC\nhAQIEBIgQEiAACEBAoQECBASIEBIgAAhAQKEBAgQEiBASIAAIQEChAQIEBIgQEiAACEBAoQE\nCBASIEBIgAAhAQKEBAgQEiBASIAAIQEChAQIEBIgQEiAACEBAoQECBASIEBIgAAhAQKEBAgQ\nEiBASIAAIQEChAQIEBIgQEiAACEBAoQECBASIEBIgAAhAQKSkGreUDwKsOEqPqSXxlSPvLIu\nfXMGH9fguaITeKrSdU25PWqi24QE3xWdwNjU/fWrL03tvDIgJKDoBAYfHT2d03lMHSEBRSeQ\nOjf97BY3lZCAohMYdGDm+VluFiHBe0UnMLXsitroef0EN/00QoLnik7ggyFudPpG/VTnCAme\nKz6B90+Z3nDr3i0JCZ5rnwTWzZ2d9ehv2mVCYMlsY0us/z8AGUlIHyzK+4XX+/bO6uFqFRvt\nYHKqp6nUZOv/D0BGElLB79o97dYoNtrBxINeNnXQROv/D0CGkAgJAoRESBAoOqQdcwwgJELy\nXNEhdepUmVVOSITkuaJDmtGj6Vt1fGpHSL4rOqTa7XfKflubkAjJd8V/s2Fh1RmNNwmJkHzX\nhu/arfiw8dbjFxe4GyERkgfa/6fkCImQPEBIhAQBQiIkCBASIUGAkAgJAoRESBAgJEKCACER\nEgQIiZAgQEiEBAFCIiQIEBIhQYCQCAkChERIECAkQoIAIRESBAiJkCBASIQEAUIiJAgQEiFB\ngJAICQKEREgQICRCggAhERIECImQIEBIhAQBQiIkCBASIUGAkAgJAoRESBAgJEKCACEREgQI\niZAgQEiEBAFCIiQIEBIhQYCQCAkChERIECAkQoIAIRESBAiJkCBASIQEAUIiJAgQEiFBgJAI\nCQKEREgQICRCggAhERIECImQIEBIhAQBQiIkCBASIUGAkAgJAoRESBAgJEKCACEREgQIiZAg\nQEiEBAFCIiQIEBIhQYCQCAkChERIECAkQoIAIRESBAiJkCBASIQEAUIiJAgQEiFBgJAICQKE\nREgQICRCggAhERIECImQIEBIhAQBQiIkCLQlpPrFs++7b86bn3MvQiIkDxQfUs3p/VzakAtW\nFbofIRGSB4oOacnmbquJM2fN+tH4gW54TYE7EhIheaDokCan7mq4VXdl2bQCdyQkQvJA0SEN\nmNR0+/DBBe5ISITkgaJDSl3YdPu8zgXuSEiE5IGiQ6o+rOn2QUML3JGQCMkDRYc0reyS1Zlb\nK891MwrckZAIyQNFh7R8B9dj1MRTp0zYs6vb/ZMCdyQkQvJA8X+OtObSEeXRHyOldr2urtD9\nCImQPNCmHxH67J/z5y9qLZOlY0Zn7exWt2WjHRESZCQ/a/fBorxfWDlzRtbRfEQipOSThDSj\n0KPwqR0heYCQCAkChERIECg6pB1zDCAkQvJc0SF16lSZVU5IhOS5okOa0aPpW3V8akdIvis6\npNrtd6ptvE1IhOS74r/ZsLDqjMabhERIvmvDd+1WfNh46/GLC9yNkAjJA/wtQoQEAUIiJAgQ\nEiFBgJAICQKEREgQICRCggAhERIECImQIEBIhAQBQiIkCBASIUGAkAgJAoRESBAgJEKCACER\nEgQIiZAgQEiEBAFCIiQIEBIhQYCQCAkChERIECAkQoIAIRESBAiJkCBASIQEAUIiJAgQEiFB\ngJAICQKEREgQICRCggAhERIECImQIEBIhAQBQiIkCBASIUGAkAgJAoRESBAgJEKCACEREgQI\niZAgQEiEBAFCIiQIEBIhQYCQCAkChERIECAkQoIAIRESBAiJkCBASIQEAUIiJAgQEiFBgJAI\nCQKEREgQICRCggAhERIECImQIEBIhAQBQiIkCBASIUGAkAgJAoRESBAgJEKCACEREgQIiZAg\nQEiEBAFCIiQIEBIhQYCQCAkChERIECAkQoIAIRESBAiJkCBASIQEAUIiJAgQEiFBgJAICQKE\nREgQICRCggAhERIECImQINDmkGoXzFtd8A6EREgeKD6kOXsO3f+54OGBzvW8stD9CImQPFB0\nSM9UuJ6duj3Tc/Cxh/V2DxW4IyERkgeKDmncgJeCZXsNGb4qCGqG7lfgjoRESB4oOqRNfhw+\necHdHN3+ycb5r10wL+tGQooxdtw8W59YX4EEKTqkilvCJ0vc/0a3b6jIe+VrZS5H4W9G2LEO\naagzdpL1FUiQokPqPzN88ri7PLr9w/75r/24JuthPiLFGDLmaVNj+NRSp+iQjtj4sTV/2/Yr\nQ94OgoW9Dy1wR75Gig2Jr9GSo+iQXu0Rfm6w8cLqrnvtVlH+fIE7ElIcQkqQ4v8c6eXxu0z8\ne/Dy18rcFr8rdD9CikNICdL2HxH6ZFnh1xNSHEJKEH7Wzg4hJQgh2SGkBCEkO4SUIIRkh5AS\nhJDsEFKCEJIdQkoQQrJDSAlCSHYIKUEIyQ4hJQgh2SGkBCEkO4SUIIRkh5AShJDsEFKCEJId\nQkoQQrJDSAlCSHYIKUEIyQ4hJQgh2SGkBCEkO4SUIIRkh5AShJDsEFKCEJIdQkoQQrJDSAlC\nSHYIKUEIyQ4hJQgh2SGkBCEkO4SUIIRkh5AShJDsEFKCEJIdQkoQQrJDSAlCSHYIKUEIyQ4h\nJQgh2SGkBCEkO4SUIIRkh5AShJDsEFKCEJIdQkoQQrJDSAlCSHYIKUEIyQ4hJQgh2SGkBCEk\nO4SUILkh7XrNR+2wQEhxCClBckOqcFXjH12nXiCkOISUILkhfXDtqHI3+OxF2gVCikNICZL3\nNdKyq/fq5Eb+6mPhAiHFIaQEafnNhiWXDXddT/qHbIGQ4hBSgrQIadXdh1S5IanUefWiBUKK\nQ0gJkhfSU8f3dFVHzQ3ePMTNFC0QUhxCSpDckN78yVbObf/L5dHt+tH9RAuEFIeQEiQ3pE6u\n10nzGl/4ZZlogZDiEFKC5Ia0+82rml5YdJ9ogZDiEFKCNP8aacH70ZMXpQuEFIeQEiQ3pNpJ\nbm747Ao3sU64QEhxCClBckP6uRv7evjs74e7XwgXCCkOISVIbkjbHtBwY8yXhAuEFIeQEiQ3\npKqfN9yYlRIuEFIcQkqQ3JD6n9Zw45T+wgVCikNICZIb0qSu/xs9q72u4hjhAiHFIaQEyQ1p\nyaZuyN4HjNzYbfpv4QIhxSGkBGn250hLT9rEOdf3u28rFwgpDiElSN4Prda/89pK8QIhxSGk\nBOEvP7FDSAmSG1L9XQeM+GqGcIGQ4hBSguSGdIlzXXtlCBcIKQ4hJUhuSIP2XdwOC4QUh5AS\nJDek1HPtsUBIcQgpQZp9RHq2PRYIKQ4hJUhuSD84pT0WCCkOISVIbkif7HvkwwsXpQkXCCkO\nISVIbkiuiXCBkOIQUoLkJjN+wuRGwgVCikNICcJPNtghpATJC+njBcvVC4QUh5ASpFlIj+/o\n3ENBMO7/lAuEFIeQEiQ3pOc799g3DGnZgM7zYu+//ggpDiElSG5IY4e89W70Eem9IQcJFwgp\nDiElSG5Im1wcpEMKLuotXCCkOISUIM3+6cvfNIR0E3+LUEcgpARp9rN2ZzeEdFy1cIGQ4hBS\nguSGdELv+VFINT90yh+6I6Q4hJQguSG9O7hiBzdiRKUbslS4QEhxCClBmv050nsnR3+LUJ+T\n31MuEFIcQkqQ/L9FaOki5UejCCHFIaQEaevP2tX97ek3C9+DkOIQUoLkhjQqa/cv8DufnhI+\nubV/+Lng8CcK3o+QYhBSgrT63yP1GPj5v3Fu5+71wd2u+3+esnenykI/UkRIcQgpQXJDWpv2\n6YIzvrni83/jnv0WBcHm1UvCm89VjStwR0KKQ0gJ0urXSGee9Pm/secZQfCRuzx9+7sb5b2y\n5pQTsg6KDemPJ9j6D0KCSqshPfsFPrXrdk4QrC67N337/C55r/xiIU2sPtRUd0KCSqshPdr1\n83/jN7b6NAi+fkZ0c/Xw4QXuGP+pne+fWlnvE5JQbkjLM5bNHfEF/u7vP7gdHlk7f9Nff1r7\n3LfctQXuSEiluk9IQq3/LUK3foHfeX03V7V1tSsvd2Xfry9wP0Iq1X1CEmr2H/ZlHHzyF/tP\nzZdesm91j8pNdpw6v+DdCKlU9wlJyPJvESIk231CEiIkf/cJSSg3pOFf2yWXaIGQSnWfkIRy\nQ+pf5ZwrC/+vqjwiWiCkUt0nJKHckGpGTnnxs2DFE9/Z5wv8iNAXRkiluk9IQrkhHdf4/9j9\njhcuEFKp7hOSUG5IfW9ouPHf/YQLhFSq+4QklBtS5YUNN/6rUrhASKW6T0hCuSFtPzDzj8g+\n1afQz86tL0Iq1X1CEsoN6YFyt/nocaO3cGX3CBcIqVT3CUmo+b9GsW8X51znb81WLhBSqe4T\nklDeTzase/ufb9VpFwipVPcJScjyHxojJNt9QhKy/IfGCMl2n5CELP+hMUKy3SckIct/aIyQ\nbPcJScjyHxojJNt9QhKy/IfGCMl2n5CELP+hMUKy3SckIct/aIyQbPcJScjyHxojJNt9QhKy\n/IfGCMl2n5CELP+hMUKy3SckoWY//b2gPRYIqVT3CUkoN6QuP22PBUIq1X1CEsoNafT+69ph\ngZBKdZ+QhHJDWjp+v9vnLUoTLhBSqe4TklDrf4m+8u9fJaRS3SckodxkDj9m0uQGwgVCKtV9\nQhLi7/72d5+QhLIhXfFk+tlf3lYvEFKp7hOSUDYkNy3zbIp6gZBKdZ+QhAjJ331CEiIkf/cJ\nSYiQ/N0nJCFC8nefkIQIyd99QhIiJH/3CUmoKaRdZkbczulnwgVCKtV9QhJqCqkZ4QIhleo+\nIQllk7m1GeECIZXqPiEJ8bN2/u4TkhAh+btPSEKE5O8+IQkRkr/7hCRESP7uE5IQIfm7T0hC\nhOTvPiEJEZK/+4QkREj+7hOSECH5u09IQoTk7z4hCRGSv/uEJERI/u4TkhAh+btPSEKE5O8+\nIQkRkr/7hCRESP7uE5IQIfm7T0hChOTvPiEJEZK/+4QkREj+7hOSECH5u09IQoTk7z4hCRGS\nv/uEJERI/u4TkhAh+btPSEKE5O8+IQkRkr/7hCRESP7uE5IQIfm7T0hChOTvPiEJEZK/+4Qk\nREj+7hOSECH5u09IQoTk7z4hCRGSv/uEJERI/u4TkhAh+btPSEKE5O8+IQkRkr/7hCRESP7u\nE5IQIfm7T0hChOTvPiEJEZK/+4Qk1PaQVsx4teDrCalU9wlJqO0hveX+UPD1hFSq+4QkVHRI\nkxuNd/tMnlzgjoRUqvuEJFR0SK6ZAnckpFLdJyShokP6XvmIh5dHXnG/Xb48/7Uf12Q9TEgl\num8d0roaY+uEhyn+a6QXRpSd/FHQ+tdIr5XlfrhaHfMIhGS7bx3SdGdsuvAwbfhmw9qfVg28\nJ+abDQvmZd3IR6QS3bcOaeIed5raQ3n+Nn3X7rVRbtybfNduQ903DylJ52/jt79v2rj7TELa\nQPcJSXiYtv450ntHOELaQPcJSXiYtv+B7IOnLyz4ekIq1X1CEh6Gn7Xzd5+QhIchJH/3CUl4\nGELyd5+QhIchJH/3CUl4GELyd5+QhIchJH/3CUl4GELyd5+QhIchJH/3CUl4GELyd5+QhIch\nJH/3CUl4GELyd5+QhIchJH/3CUl4GELyd5+QhIchJH/3CUl4GELyd5+QhIchJH/3CUl4GELy\nd5+QhIchJH/3CUl4GELyd5+QhIchJH/3CUl4GELyd5+QhIchJH/3CUl4GELyd5+QhIchJH/3\nCUl4GELyd5+QhIchJH/3CUl4GELyd5+QhIchJH/3CUl4GELyd5+QhIchJH/3CUl4GELyd5+Q\nhIchJH/3CUl4GELyd5+QhIchJH/3CUl4GELyd5+QhIchJH/3CUl4GELyd5+QhIchJH/3CUl4\nGELyd5+QhIchJH/3CUl4GELyd5+QhIchJH/3CUl4GELyd5+QhIchJH/3CUl4GELyd5+QhIch\nJH/3CUl4GELyd5+QhIchJH/3CUl4GELyd5+QhIchJH/3CUl4GELyd5+QhIchJH/3CUl4GELy\nd5+QhIchJH/3CUl4GELyd5+QhIchJH/3CUl4GELyd5+QhIchJH/3CUl4GELyd5+QhIchJH/3\nCUl4GELyd5+QhIchJH/3CUl4GELyd5+QhIchJH/3CUl4GELyd5+QhIchJH/3CUl4GELyd5+Q\nhIchJH/3CUl4GELyd5+QhIchJH/3CUl4GELyd5+QhIchJH/3CUl4GELyd5+QhIchJH/3CUl4\nGELyd5+QhIchJH/3CUl4GELyd5+QhIchJH/3CUl4GELyd5+QhIchJH/3CUl4GELyd5+QhIch\nJH/3CUl4GELyd5+QhIchJH/3CUl4GELyd5+QhIeRhFTzRoFXElKp7hOS8DDFh/TSmOqRV9al\nb84o9CiEVKr7hCQ8TNEhPVXpuqbcHjXRbULaIPcJSXiYokMam7q/fvWlqZ1XBoS0ge4TkvAw\nRYc0+Ojo6ZzOY+paCWnlzBlZRxNSie7vvu0MU9sSUih1bvrZLW5qKyEtHTM6a2e3OuYhCMl4\nv++uproQUmjQgZnnZ7lZfGrH/oa4XxohTS27ojZ6Xj/BTT+NkNjf8PZLI6QPhrjR6Rv1U50j\nJPY3vP3SCCl4/5TpDbfu3ZKQ2N/w9kskpC+KkNgvzX1CErG+kOzb7hOSiPWFZN92n5BErC8k\n+7b7hCRifSHZt90nJBHrC8m+7T4hiVhfSPZt9wlJxPpCsm+7T0gi1heSfdt9QhKxvpDs2+4T\nkoj1hWTfdp+QRKwvJPu2+4QkYn0h2bfdJyQR6wvJvu0+IYlYX0j2bfcJScT6QrJvu09IItYX\nkn3bfUISsb6Q7NvuE5KI9YVk33afkESsLyT7tvuEJGJ9Idm33SckEesLyb7tPiGJWF9I9m33\nCUnE+kKyb7tPSCLWF5J9231CErG+kOzb7hOSiPWFZN92n5BErC8k+7b7hCRifSHZt90nJBHr\nC8m+7T4hiVhfSPZt9wlJxPpCsm+7T0gi1heSfdt9QhKxvpDs2+4Tkoj1hWTfdp+QRKwvJPu2\n+4QkYn0h2bfdJyQR6wvJvu0+IYlYX0j2bfcJScT6QrJvu09IItYXkn3bfUISsb6Q7NvuE5KI\n9YVk33afkESsLyT7tvuEJGJ9Idm33SckEesLyb7tPiGJWF9I9m33CUnE+kKyb7tPSCLWF5J9\n231CErG+kOzb7hOSiPWFZN92n5BErC8k+7b7hCRifSHZt90nJBHrC8m+7T4hiVhfSPZt9wlJ\nxPpCsm+7T0gi1heSfdt9QhKxvpDs2+4Tkoj1hWTfdp+QRKwvJPu2+4QkYn0h2bfdJyQR6wvJ\nvu0+IYlYX0j2bfcJScT6QrJvu09IItYXkn3bfUISsb6Q7NvuE5KI9YVk33afkESsLyT7tvuE\nJGJ9Idm33SckEesLyb7tPiGJWF9I9m33CUnE+kKyb7tPSCLWF5J9231CErG+kOzb7hOSiPWF\nZN92n5BErC8k+7b7hCRifSHZt90nJBHrC8m+7T4hiVhfSPZt9wlJxPpCsm+7T0gi1heSfdt9\nQhKxvpDs2+4Tkoj1hWTfdp+QRKwvJPu2+4QkYn0h2bfdL5mQ6hfPvu++OW9+zr0Iif3S3C+R\nkGpO7+fShlywqtD9CIn90twvjZCWbO62mjhz1qwfjR/ohtcUuCMhsV+a+6UR0uTUXQ236q4s\nm1bgjoTEfmnul0ZIAyY13T58cIE7EhL7pblfGiGlLmy6fV7nvFe+3rd3Vg9XG/MQk1M9TXVi\n3+v91ORi3/lbUXRI1Yc13T5oaN4r182dnfXob+IeYslsW3feyb7P+7OXFPvO34qiQ5pWdsnq\nzK2V57oZqjcH2DAVHdLyHVyPURNPnTJhz65u90+UbxKw4Sn+z5HWXDqiPPpjpNSu19UJ3yBg\nQ9SmHxH67J/z5y+K+54c4JH2/1k7wAOEBAgQEiBASIAAIQEChAQIEBIgQEiAACEBAoQECBAS\nIEBIgAAhAQKEBAgQEiBASIAAIQECliHt6gBDuwrfmS1DOnLcPFPj2Pd7/0jhO7NlSBOVf9Ml\n++xb7hMS++wLEBL77AsQEvvsCxAS++wLEBL77AsQEvvsCxAS++wLEBL77AsQEvvsC1iGdMIJ\nhuPss6/ctwyppsZwnH32la18mSYAAAgZSURBVPv8ZxSAACEBAoQECBASIEBIgAAhAQKEBAgQ\nEiBASIAAIQEChAQIEBIgQEiAACEBAoQECBASIGASUu2ZnXbM3Fo+rTq16eQlVvs3NfyzBD/u\n0Pma04d0HnrQs9FNk/M37ducf/F3t+jc56Dno5sm52/aF57fIqSFO/RoeEdes4M75MJJqc07\n9j+VbNq/zI2fEXmsI+c/HOrGnnNURZe/GZ0/Z9/k/H/fpPPRM49KpZ4xOn/OvvD8BiGtqNpp\nUWXmHflS97Pw6Z3udKP9me6FjlzOmOKuCJ/e68YYnT9n3+T8e5c9ET69zx1mdP6cfeH5DUL6\n8PTaoOEdeUSP1dGzL/Wrt9mf5hZ14HCD6aNqw6f1VdVG58/ZNzn/j86KntalhhudP2dfeH6j\nbzZk3pE/Kx+VfmmiW2yyH0xw79e99X4Hb2esTn3D8PyZfcvzv+0ONj1/tK88v2lI/3SZv1ls\nppttsh8c7M7u7dx/3NbB65HLw0+w7M6f2bc7/6dzt+vxguH5M/vK85uGNN9NSb90ibvPZD/Y\n021x8S1n9XTXdPB8EDzeeeRaw/Nn9s3O38u5oxcbXv+GfeX5jUM6Nf3SLHe/yX4w556V4dNX\nKjde08H7t1fu8KHl+TP7Zuc/84Svdxq52O78DfvK85uGtMhNSL/0I/d/JvuNvu3+3KHr9ee6\n/T4O7M7fuN+oo88fmdttu3V21z+z33hbcX7TkNZU7Jl+abz7t8l+oxNdh/5BSv0kd1pddMPo\n/Nn9Rh18/owj3UK765/Zb7ypOL9pSMEuXT8Nn64bONhm/5Orbk+/NLJjv2s0zV3UcMvm/Nl9\nk/O/vd0x6effcS+YnD9nX3l+25Cuc+eFT69259vsr9us+6vhs9+57Tty+143rfGmyfmb9m3O\nP6jzc+HTf3Tv/pnN+Zv2lec3COnxGTNmlA8In3wQ1O3uDjr/iLJtPzXaf6Cs2+Rzvl3Wc35H\n7m/pTkv/XMqMGpvz5+ybnP/+8tQRZ0/s5n4Z2Jw/Z194foOQLm74ScHoT5U/OaM6tdmUD832\nn9l/o4qBx3bsH+83zrs3bM6fu29x/uC5g/uWbzT699FNi/Pn7uvOz39GAQgQEiBASIAAIQEC\nhAQIEBIgQEiAACEBAoQECBASIEBIgAAhAQKEBAgQEiBASIAAIQEChAQIEBIgQEiAACEBAoQE\nCBASIEBIgAAhAQKEBAgQEiBASIAAIQEChAQIEBIgQEiAACEBAoQECBBSAvSabf0WgJA2dHfu\n3sdVbHHRZ9Zvh+cIaQN3sdv1gqqJu7kjrN8QzxHShu3Tym/UR5/afce9YP2m+I2QSsW7kwd2\n3e4Xa8Nbzx+8Sar66DfCW4e790Z3eaDxWfCviQNTm4x7PnzF6lnb9ey+7ax1wWI3Pf010oJL\nXwvGu+Un9Kva5flPpw3stlv0L94f7JZM7td52FXRw/9x56r+U1cN2t7whIlGSCVi2Wa9Tvvv\nA9zkIJjXZeAF153Zo98HQXCMO3L/i15ufPZmv+4/uPnCzSqfDILj3JFXX/NtNyX8iLTNqsZv\nNkxwo89/8eYuQw6YMe+ejfrXRh1+bcbTT+7trg+CJ8oHnH/lngf22sX4mIlFSCXiZPdI+HSs\nWxBctcPc8NYV7oogmOT2WRdkn01w94VPF5bvGgRdd4t+z/cOqQvOdcN+2S0T0mR3cvj0MHdo\n+HSaezoKaXx486PKoUGwd/SpX91ejpDaCSGVhvpNBteHzxY/9n76xdrP5rjTozRui17KPKvv\n1T+6SzDSfRD0Gvhe42+8vL9zAybMTd8tCupsd2v49Cp3TxTSA9FdRrslQZcvR7ceJqT2Qkil\n4R23d/b2Ld/cyIWmRWnMi34h82yJ+1aQeemZ4HLX85gb387cve7xqi06ucPWhK9YGL440z0W\nPr3e3RGF9Gp0hwnuxeXugOjWx4TUXgipNLyWeU+PnOV2uunxZ3+VCWlR9CuZZ4vcuPTrT40+\n8Mw5uJsrG/OvzO/oNftf+7vLG+4204VfQzWG9O/o1ae4x15zh6XvWU5I7YSQSsNKN7Lh1mdV\ngz8Jos/C8kN6t+Ej0nHuuejZ6tkTyr60Jv0rvWYHK8rHtBZS9CEqOMq99G93YHTrUz4itRdC\nKhF9N6kNn/79igVvuG9HL5/VIqRg403TXyPtUra84fec7J4/b8DyzI8I9RrZWkj3Rnf7mlu2\nptPw6NZjhNReCKlEHB99kzo4ws1fVRb9Wc9fNnMn5od0vLs/ek3ZqODZgb+OfmGKe/Fmd2L6\nD2Tvcqe3FtLY8OY/yoaFMZWFXy7V7UtI7YWQSsRbAypOveQAd2wQHOBOvOOc3g9WDLp9ZfOQ\n3hnQ/Ye/Pr9fj5eCtdt0/u6VV03qNLK+bj83/PtdjjywbPDS1kIafcA1Vw2Nvud3t9v8kmt3\nn1BJSO2EkErFv47ul9ri53VBsOzIvr2+9WRwfvcB7zYPKXjzuE0r+h0Rfd3z4fQtu/YaflH4\nxdTqy3fs7SqqpywNWgtp0fSBnbe+Ofq9NwzrXH12beevWx0v6QgpAeL+M4rD3VvNf2FF5nsO\n0COkBLh4ceu/nhPSjXtEfxR1uZvVQW+SdwgpwXJCeq5ywPnXn1IxZHmh+6N4hJRguZ/aPbV/\nv9Rmk94xfGuSjZAAAUICBAgJECAkQICQAAFCAgQICRAgJECAkAABQgIECAkQICRAgJAAAUIC\nBAgJECAkQICQAAFCAgQICRAgJECAkAABQgIECAkQICRAgJAAAUICBAgJEPh/bpUyoXu9fEoA\nAAAASUVORK5CYII="},"metadata":{"image/png":{"width":420,"height":420}}},{"output_type":"stream","name":"stderr","text":["Installing package into ‘/usr/local/lib/R/site-library’\n","(as ‘lib’ is unspecified)\n","\n"]},{"output_type":"display_data","data":{"text/plain":["plot without title"],"image/png":"iVBORw0KGgoAAAANSUhEUgAAA0gAAANICAMAAADKOT/pAAADAFBMVEUAAAABAQECAgIDAwME\nBAQFBQUGBgYHBwcICAgJCQkKCgoLCwsMDAwNDQ0ODg4PDw8QEBARERESEhITExMUFBQVFRUW\nFhYXFxcYGBgZGRkaGhobGxscHBwdHR0eHh4fHx8gICAhISEiIiIjIyMkJCQlJSUmJiYnJyco\nKCgpKSkqKiorKyssLCwtLS0uLi4vLy8wMDAxMTEyMjIzMzM0NDQ1NTU2NjY3Nzc4ODg5OTk6\nOjo7Ozs8PDw9PT0+Pj4/Pz9AQEBBQUFCQkJDQ0NERERFRUVGRkZHR0dISEhJSUlKSkpLS0tM\nTExNTU1OTk5PT09QUFBRUVFSUlJTU1NUVFRVVVVWVlZXV1dYWFhZWVlaWlpbW1tcXFxdXV1e\nXl5fX19gYGBhYWFiYmJjY2NkZGRlZWVmZmZnZ2doaGhpaWlqampra2tsbGxtbW1ubm5vb29w\ncHBxcXFycnJzc3N0dHR1dXV2dnZ3d3d4eHh5eXl6enp7e3t8fHx9fX1+fn5/f3+AgICBgYGC\ngoKDg4OEhISFhYWGhoaHh4eIiIiJiYmKioqLi4uMjIyNjY2Ojo6Pj4+QkJCRkZGSkpKTk5OU\nlJSVlZWWlpaXl5eYmJiZmZmampqbm5ucnJydnZ2enp6fn5+goKChoaGioqKjo6OkpKSlpaWm\npqanp6eoqKipqamqqqqrq6usrKytra2urq6vr6+wsLCxsbGysrKzs7O0tLS1tbW2tra3t7e4\nuLi5ubm6urq7u7u8vLy9vb2+vr6/v7/AwMDBwcHCwsLDw8PExMTFxcXGxsbHx8fIyMjJycnK\nysrLy8vMzMzNzc3Ozs7Pz8/Q0NDR0dHS0tLT09PU1NTV1dXW1tbX19fY2NjZ2dna2trb29vc\n3Nzd3d3e3t7f39/g4ODh4eHi4uLj4+Pk5OTl5eXm5ubn5+fo6Ojp6enq6urr6+vs7Ozt7e3u\n7u7v7+/w8PDx8fHy8vLz8/P09PT19fX29vb39/f4+Pj5+fn6+vr7+/v8/Pz9/f3+/v7////i\nsF19AAAACXBIWXMAABJ0AAASdAHeZh94AAAgAElEQVR4nO3dB3gUZQKH8W/TQwIh9E5EPRQV\nCyqiqCCighRRDwEVOBAVLHACIopiOzj1bGdDsKAeeif2ayoKeDZQUFEElaaoSFGwUEOSuZmd\nTSRhs1kyf3Yy8f09PjvfZr/d/XbcN9tCYiwAnhm/FwBUB4QECBASIEBIgAAhAQKEBAgQEiBA\nSIAAIQEChAQIEBIgQEiAACEBAoQECBASIEBIgAAhAQKEBAgQEiBASIAAIQEChAQIEBIgQEiA\nACEBAoQECBASIEBIgAAhAQKEBAgQEiBASIAAIQEChAQIEBIgQEiAACEBAoQECBASIEBIgAAh\nAQKEBAgQEiBASIAAIQEChAQIEBIgQEiAACEBAoQECBASIEBIgAAhAQKEBAgQEiBASIAAIQEC\nhAQIEBIgQEiAACEBAoQECBASIEBIgAAhAQKEBAgQEiBASIAAIQEChAQIEBIgQEiAACEBAoQE\nCBASIEBIgAAhAQKEBAgQEiBASIAAIQEChAQIEBIgQEiAACEBAoQECBASIEBIgAAhAQKEBAgQ\nEiBASIAAIQEChAQIEBIgQEiAQAJC+mgBECgf7fm9fO+H9L4BAub9Pb6b7/2Q3jY79vp1AEI7\nzNt7fB5CAsogJECAkAABQgIECAkQICRAgJAAAUICBAgJECAkQICQAAFCAgQICRAgJECAkAAB\nQgIEfAkpf/GC7TEnlBfSzGPq1z9mpterL/Hhld1Ov+qTqCd9e9PZXS59JTxcPqF31yvsvbT+\nlr4nDX9xwkG5zbsvtZd4RdfeE5Zb1tKre5465r1fz/jzX8/rNOxvO3e/xHdHn9Lrmi8qWtKn\n43ucNnZh5Ejh0xd17nfHxj2+XUi8xIb0eqe8bvOsl5sYU+u+WPPKCelUk3P00Tnm1Epff2k3\nJp945ZiOybdFOemlmgdfMqFXav98y3o4/ahR409NGvl6nd9dfF3PkGlyQpu00O0jk04dP+rI\n9IfvTT3minFdksYXn/HjFk0vmDigVvsNZS6waHRS16v+eHTag7GXdFfKsaPHdU66Nnzkp05Z\nfSdeuE+jeR5vJxIgoSG9k2JqJWW9U6v5wL655r8xJkYPabQZ52zGmTGVXUApT6a/5GyeTn1x\nt5M+z5hYZG8+bnSl9VbKFOcrb2SnjyqwrAOSGw6zd9rhJut/zlcfSE5+zNm+WuMh94ybW/Td\nam/Wtuta5hLvy57tbB5KmRtrSf9JmRHeZIQv9fcHfmUf7hhSn8ekqi+hIfVstMha37nFofZ9\nbWPeaTEmRg8p8yh3e1SNyi6glIMjDyMj2+920kUnutunM37pMcAddkm1n64tMrfMSv7O3muh\nPPerDVu425tbudspjbaEt58n7fJsz1bU7FZ3MDDWzbY6jnC3E1s7lxH5dRr5+/45vhsEHyU0\npLo3Wc5vCJrujG+uU+bEwjmzStwVLaS1Zpo7mGrWVXYFu9hoFriDN0K7vWBrc7e73Z4yO+cZ\nd3ik+dyyxoYKC2s/69zHs8NfLErJck9dYr4Jb88dHLmEtneUusCVZoU7eCErxpJ2Jr/mDhY5\nt/DhlpEvj+oR502CfxIaUsrj9sEa829n/HBKmRNX1s8tUcNs3v3cHxr3xb/1X/NhZVewi6/M\nSnfwiSn7gsZq/kRkkPN88mx3dJDz+DDUXnTeo843g4zwF7eapKLwYK1ZEt72vCJyxk4TS13g\nR2aTO/hfKMr7EMV+Mh+4g6/NMsu687DIl288Ic6bBP8kNKSGE+2DuSb87f7qhjEmTjG/7P7F\nLeZ6dzDRbKnsCnaxLe1Vd/B8VmHZ0zpMdLfrQgtbTHWHHY39lO4Ws25z+mvON4Nc96tZdd3t\nW8k/hrfDe7nHi5o9VOoCN4Qiv/XskcYxllRU62l3MCfFvv0za0eaO39AvLcJvkloSP3qzN7x\n8SEHtrCfBi3JPTvGxKghWU3rhu/xO+s2rewCSunVPfxoUti5324n/bn5T+Ht1S0LLz/MfZbZ\nIWW9/ZAR6nFbPfuJ4KfGfU20o04j985+dhf3jK+kLQ1vZ6Z9W/oSj3djyG83PNaSBnYscDZF\nvZ1XUpuy3aeyX2U/vYe3DImX0JCW1jTG1FnSskbnDinJ82NMjB7Sf0N5i+zXD3mhVyq7gFI+\nrTVwrWV9e07u8t1O2nzgMYvtwxtSXrDWNj3Nfgq48fL0A9var6mGmqQHLOuJjMz0yzfaz0ZP\na1Sv92r78ebCGpHnZFbvlvYD1s7p2TeWucT5GSN+sKwvT2+8JtaSVtU7y/4ms35I9sfOsbsz\nHrAjfut3J+32iIkqJ7GfI33Sv/3gz6xPjg6ZVi/Emhc9JGtGhklJMRkzKn39pb3XJpTX0rSN\n9kub13Qz9VunNHTeaPiig2m6b9I+s78/K1T3gNT0kLH/a/rF6/sk7dvUHLvs03ameavQ/m8V\nn3HrRcm12mRk/bmo7CXO3Tdp32am/Wexl/TJ4abFPqHW77rH7q2V1qZ20vk/ebmRSAx/fkTo\nl/WxTy8nJGvnjAsueCLGq/U9VLjg0ccW7naXd33+jwf/t80dfjxj2rvOla585oE5Wzbc2X/M\nG85S5k2bEX7c+OiJh+cX7HLGb1+879VN0dY+/6G/LapwSUUfPv7IeyWPQD+/dv9zq+O8MfBV\n1fxZu/JCAqooQgIECAkQICRAgJAAAUICBAgJECAkQICQAAFCAgQICRAgJECAkAABQgIECAkQ\nICRAgJAAAUICBAgJECAkQICQAAFCAgQICRAgJECAkAABQgIECAkQICRAgJAAAUICBAgJECAk\nQICQAAFCAgQICRAgJECAkAABQgIECAkQICRAgJAAAUICBAgJECAkQICQAAFCAgQICRAgJECA\nkAABQgIECAkQICRAgJAAAUICBAgJECAkQICQAAFCAgQICRAgJECAkAABQgIECAkQICRAgJAA\nAUICBAgJECAkQICQAAFCAgQICRAgJECAkAABQgIECAkQICRAgJAAAUICBAgJECAkQICQAAFC\nAgQICRAgJECAkAABQgIECAkQICRAgJAAAUICBAgJECAkQICQAAFCAgQICRAgJECAkAABQgIE\nCAkQICRAgJAAAUICBAgJECAkQICQAAFCAgQICRAgJECAkAABQgIECAkQICRAgJAAAUICBAgJ\nECAkQICQAAFCAgQICRAgJECAkAABQgIECAkQICRAgJAAAUICBAgJECAkQICQAAFCAgQICRAg\nJEAgoSGt+iHOiYSEgEloSCbj5h1xTSQkBExiQ8pLPnBOPBMJCQGT2JDGvX+46fJmxRMJCQGT\n4JCsgjvrmxMe+7GCiYSEgEl0SJa1eXJdk3zU0Jv/WubElfVzS9QwP1f2OgA/JD4ky9ryRM8s\nY8peSuGcWSVG8oiEYPEjJOdqP/z7/TEm8tQOAeNTSBUgJARMQkNKnxDnREJCwPAjQoAAIQEC\nhAQIEBIgQEiAACEBAoQECBASIEBIgAAhAQKEBAgQEiBASIAAIQEChAQIEBIgQEiAACEBAoQE\nCBASIEBIgAAhAQKEBAgQEiBASIAAIQEChAQIEBIgQEiAACEBAoQECBASIEBIgAAhAQKEBAgQ\nEiBASIAAIQEChAQIEBIgQEiAACEBAoQECBASIEBIgAAhAQKEBAgQEiBASIAAIQEChAQIEBIg\nQEiAACEBAoQECBASIEBIgAAhAQKEBAgQEiBASIAAIQEChAQIEBIgQEiAACEBAoQECBASIEBI\ngAAhAQKEBAgQEiBASIAAIQEChAQIEBIgQEiAACEBAoQECBASIEBIgAAhAQKEBAgQEiBASIAA\nIQEChAQIEBIgQEiAACEBAoQECBASIEBIgAAhAQJeQvq6NOGqCAkB4yUkU5pwVYSEgPES0jml\nCVdFSAgYXiMBAl5DOmbKj7rFlCAkBIzXkFJMZv9XC3XrcRESAsZrSN8/2CXZNL9mmW5FDkJC\nwAheI61/oHOS6fjQz6IVOQgJAaN5s2HNnYeaGhd/rlhQGCEhYCQhbZ15VqZpkZp6fZFkTYSE\nwBGE9NYFtUzmuXOs1WeZiZpFERKCxmtIq2/e35jD793kjItObiBaFSEhYLyGlGRyLl5QfOTe\nkGJJFiEhcLyGdPz0rb8eWfac9wWFERICxvtrpMUbnIMPROtxERICxmtI+UPMHHtzjxlcoFqS\nRUgIHK8h3W5OX2lvPjvH3CVbEyEhcLyGdEiPyKD7fpL1uAgJAeM1pMzbI4NbUyXrcRESAsZr\nSA0viwxGNJSsx0VICBivIQ2p8W9nkz815XzVkixCQuB4DWlNY9Oia4+OdUzjr3SLIiQEjefP\nkdZeXNcYU3/YN7IlWYSEwBH80GrRt8s3i1ZTjJAQMB5Dem+FfbD9ru4dx67TrYmQEDieQtp2\njrnT3pxpknNMS2VJhISA8RTSTebMxZY1y/T42XoqdKlwVYSEgPEUUt6xzuHAZOeNhm55ukUR\nEoLGS0izUgbPsjXczznsnzprhWxVhISA8RJSjsnMycnJCh/mZJicybJVERICxtNTu9ybLOdf\nULzhjP9YR7coQkLQeAqpwzFF1tbWjZ1ftFrY9kjhqggJAeMppL+Z40a2MX+1R5uGmnuFqyIk\nBIy3D2QnpZv065xfZtfInL5DuCpCQsB4/MmGLSu2hLfXT1f+S3NCQtB4/1k7p6Dt8z5Q/ZLV\nMEJCwHgNqWDE2Za1qpUxHZV3fUJCwHgNabK5wrK6h4aPSNJ9ikRICByvIR18pmV9ExpqWUMO\n0y2KkBA0XkPKnmJZD5vXLOu+2rpF/SZCWhd5Vfn9zlizNuz6Js7O7yu+2M+3lQzXy/+SIsrl\nNaSadkj9s3ZY1r1ZcZ+/4OO3V8eeUe1DWtCtlsnu8qa16tx6Ju3omeXMWta3jknv8GLk2FNH\nppl658fcc3NbhIzJHucMF/XMMTU6zVYuGjF4fmo3wFqb3cceDGsdxznfvsQ+eKKhMebQN2LN\nq+4hvZT6+5cW/3tgyqTc4//+yWtj0yZEnfVerS4zF88amTIpfOzK9Kte/+SpY+t+Wv7FzgjV\n/uPzt7QznS3r1YzeLyz+7wXJ0/bG8rE7ryFNMh2amLmW9Vja2IrPOCctu8iaabJ/P6JrUvqC\nGBOreUib6l4X3v4lqUf42dfLSe9EmbWz9cDws7/nkj+0D99Ifs05UtD7qHIvdmd6y/DFXWce\n39x4dPhLUzK+FK4b5fMa0rbBmTnOzwg1PmRjxWfs1GCZZe3Tco09nJfZM8bEah7SIw3yw9t5\nxX+ZrefQKLPmpG5wByddbh8MPNM9sir0UXkX+4BZ5A7qHfSPnMgfCTn4Zu/LRRw0f0PWst6N\n+ZI5otYYy/rR3B0eDyv75sTGEReWOL56hzQ68nueH826wB1MPibKrHsPigwmdLEP2v0lcqzJ\njPIu9ry0yKBzznWdI8ML+3tbKuIkCGnDO7PmbYrrjFnXWtb20LPh8Q0ZZU78DYU0pjIhFf9u\n6LhCmkhICeY5pDfbG1uoyydxnPG4/bdY1rFjnOH2Qw+NMbGaP7V7tKH71G5+zKd2c/f0qd0U\nE/mfUO+gp3lql2BeQ5qfntxx6KV/aB+q9VnFZ/ynOeKVnQsbP7Ylf95J5sEYE6t5SPG92VDA\nmw0B4jWkns2WhrcfNIjnOcS0LJPZpqVJTjahK2L9lGs1D2nXt7//IX77+wXe/vaF15DqTooM\nro/rr1Gsve3UljXT67a7fGHMadU9JD6QrXa8hpTyeGQwnb+PtGf4EaFqxWtITcZHBlc2lazH\n9VsICdWK15AGZ7/gfGcteq74nVwJQkLAeA3pywam0Uk9T2pkGn+tWxQhIWg8f460elCOMabO\nBWtkS7IICYGj+PtIa5Z9J1pNMUJCwHgN6cXFurX8ipAQMF5Dyvizbi2/IiQEjNeQTu62Nz6s\nICQEjNeQ1vY/7ckFy8J0iyIkBI3XkMyvdIsiJASN15DOOX/I0AjdoggJQaP6F7JahISA4e1v\nQIC3vwEB3v4GBHj7GxDg7W9AgLe/AQHZ29+blT8BTkgIGFlIMxp7XsuvCAkB4zmkDfeMHmm7\nqGlN2ZoICYHjNaRV9SNvNaTcoFsUISFovIZ0bs17XzcPvXxV05d1ayIkBI7XkFpcZW0z71rW\nh3Xe0i2KkBA0XkNKnWpfhPPX967tIlsTISFwvIZU5ybLyn7UHjyVo1qSRUgIHK8h9W46x+pw\npH23H9ZAtyhCQtB4/rMuGe2sR0zzPoeZc3WLIiQEjefPkRbcbxWNzzShXhtkayIkBI7mJxu2\nrdqqWEwJQkLAeA9psfNQtPgD0XpchISA8RpS/hAzx97cYwYXlDO7MggJAeM1pNvN6SvtzWfn\nmLtkayIkBI7XkA6J/KV7q/t+kvW4CAkB4zWkzNsjg1v505f4DfMaUsPLIoMRcf0x5jgREgLG\na0hDavzb2eRPTTlftSSLkBA4XkNa09i06NqjYx3T+CvdoggJQeP5c6S1F9c1xtQf9o1sSRYh\nIXAUf/ry2+WbRaspRkgIGH6JPiBASIAAIQEChAQIEBIgQEiAACEBAoQECBASIEBIgAAhAQKE\nBAgQEiBASIAAIQEChAQIEBIgQEiAACEBAoQECBASIEBIgAAhAQKEBAgQEiBASIAAIQEChAQI\nEBIgQEiAACEBAoQECBASIEBIgAAhAQKEBAgQEiBASIAAIQEChAQIEBIgQEiAACEBAoQECBAS\nIEBIgAAhAQKEBAgQEiBASIAAIQEChAQIEBIgQEiAACEBAoQECBASIEBIgAAhAQKEBAgQEiBA\nSIAAIQEChAQIEBIgQEiAACEBAoQECBASIEBIgAAhAQKEBAgQEiBASIAAIQEChAQIEBIgQEiA\nACEBAoQECBASIEBIgAAhAQKEBAgQEiBASIAAIQEChAQIEBIgQEiAACEBAoQECPgR0o73Zq+M\nPYOQEDAJDemm2c7hlFxjTLsPY00kJARMQkMy4+yDf5n0PhcdZ3KWx5hISAiYxIe0f84S+/DZ\n0B9iTCQkBEzCQ1pvrg6Pz2ha5sTCObNKjCQkBEvCQ1ptngiPJ6SWOXFl/dwSNczPlb0OwA8J\nD6kgZ3J4PKROjIk8tUPAJDak/u8v2zB+vy32cGlWzxgTCQkBk9iQXM9Y1oyspPdiTCQkBExC\nQ3r0zokjB53R6XXLuq/pP2NNJCQEjE8/IvRLYcyTCQkBw8/aAQKEBAgQEiBASIAAIQEChAQI\nEBIgQEiAACEBAoQECBASIEBIgAAhAQKEBAgQEiBASIAAIQEChAQIEBIgQEiAACEBAoQECBAS\nIEBIgAAhAQKEBAgQEiBASIAAIQEChAQIEBIgQEiAACEBAoQECBASIEBIgAAhAQKEBAgQEiBA\nSIAAIQEChAQIEBIgQEiAACEBAoQECBASIEBIgAAhAQKEBAgQEiBASIAAIQEChAQIEBIgQEiA\nACEBAoQECBASIEBIgAAhAQKEBAgQEiBASIAAIQEChAQIEBIgQEiAACEBAoQECBASIEBIgAAh\nAQKEBAgQEiBASIAAIQEChAQIEBIgQEiAACEBAoQECBASIEBIgAAhAQKEBAgQEiBASIAAIQEC\nhAQIEBIgQEiAACEBAoQECBASIEBIgAAhAQKEBAgQEiBASIAAIQEChAQIEBIgQEiAACEBAoQE\nCBASIEBIgAAhAQKEBAgQEiBASIAAIQEChAQIEBIgQEiAACEBAoQECBASIEBIgAAhAQKEBAgQ\nEiBASIAAIQEChAQIEBIgQEiAACEBAoQECBASIEBIgIA/If00bmnM0wnJux9eue/haQ/M3hx7\n1ro7+o95M85LXPnMA3O2xDd1x9tTn/q0gjnLZ06ZuzXOq47X2r/0H/vunp/t06emvr0jjnmF\nC6ZPX1AY9SR/Qvra/DPm6YTkVdFNNdJrGZObmvtQrGmDQiY9ZJqvjOMSvz8rVOeA1LrT47n2\n/zRL3r+ROfHLGFPW9zZ1D0it97d4Li5u54ZvTt7qPTvXlyeaRvsnN/9vhRMXHmzy8szBC6Od\nltCQhhbrb04ZOjTGRELy6ppa09sf9N4rzc6+MzVGSYNMn58sa3p6zW0VXmD+UW0XWNa2v6Q+\nVvGVv556pX2xX3TO21julO2HHf6hZW29JeWpii8ubv1MX/t+My0tJ55HlxI/5HX+wrJ+vDJ1\ndgUTP8sZ8J1lfTcg5/MoJyY0JFNKjImE5NGXqS8+kmv/X/84dc5dueU+HdsQ6hPeLgrF+q7m\nerDu+vD2tnrbK5x7yIjwZmvr8eVOuafBD+HtnxrmV3hx8VoT6hfeLggN35OzXXWA+wRzxCEV\nTDzzlCJnU3jKWVFOTGhIf0w+7OVNjk/N3zdtijGRkDy6r5XV62JncOqorZnlPme50bj3ZqtN\nowovsdtl7nZz+msVTV1uvnAHdxxY7pwuo93tjyn/q/Cq4zU+FLnX/K7ZnpztgDvc7edmecx5\n+Rn/cgf/zIgSf2JfI71/WGj4j1b010gr6+eWqGEqeI2M2MafYh1xuzO49Cxr/6nlzTo/NTLo\nVaPCSzzkr5FB3qMVTZ2bFHk9/lLNcue0nhIZNJlR4VXHq296ZHBq+dcbRc3IfbEwNDfmvDUm\n8pTuM7Nm91MT/GbDzj9nNnkmekiFc2aVuMvs0bNclDX5KKvTBGcwYEhRvb+XN2tk8T3+uNwK\nL/G4691tYe1nK5r6QfED3fSm5c45apK7LciK/bbTnrgoOTI4ut6enK1J5FXf9+aDmPN+MZH3\nA98JRfk2n/B37ZZ3MT1XV/Su3duE5M1bySuvPajAsn6u98jc0DflzXrP3B3e7kg/vsJLvOow\nN7pZSd9VNDU/d5o76NWv3DlXHBV+vWH9O+X7Cq86Xm8Y97F3W1qXPTnbOb3d7dTcCl6uHTHW\n3Y45IsqJPrz9/Wid7ImEtJed2P7TnEt3bunTasm+g8uftV+q82xmW9vQJxVe4Lc1R9lhWl/k\nDav4yv+UO9/Z3JFa/rf4r7LGOmEubX5JxRcXt7w05yOxLQeGor2tVq6FqeEXSfNyJ1UwcWba\nc87mubRnopzox+dI6/oZQtrL1rXLOaVGrRq1T8k8LcZnqBvqmWYntklN+mv5U0rMrvO7i687\nK6NHHJ+hFg5L7n715YdnPhljzqu1Dxh+XZ/0Myp+DzB+a+u4N2dKxVN39WTm4Zdf3T35wuif\ntO5icvIJY8eekDw52mn+fCD7n9FLYp5OSJ7lP37BsUccccLFLxTFmlU4vk1ui9Pj+wa+/pa+\nJw1/KebFlZg76uQzJ66KOWXt5N+fNOJf8V1cvHaOtW9Oz9hvvkWxauKZJ4+M/U6Da9G47t3H\nLYp6UtX8WTtCQsAQEiBASIAAIQEChAQIEBIgQEiAACEBAoQECBASIEBIgAAhAQKEBAgQEiBA\nSIAAIQEChAQIVM2Q3jdAwLy/x3fzvR+S9dGCXQ08+IkqYURtv1fgmmSm+L2EsMfNNX4vwdV0\nzALffbTn9/IEhFTaNV0TfY3RPdnY7xW4FhX/4jifFZo3/F6Cq819fq+gUgjJZ4RUBiHFh5BK\nI6QyCCk+hFQaIZVBSPEhpNIIqQxCig8hlUZIZRBSfAipNEIqg5DiQ0ilEVIZhBQfQiqNkMog\npPgQUmmEVAYhxef60xN9jdE909LvFbiWhn72ewlhRanv+r0E12HT/F5BpSQ8pF/WJfoao9v5\nld8riFjh9wIiVmr/KkulfR3MfyyQ8JCA6oiQAAFCAgQICRAgJECAkAABQgIECAkQICRAgJAA\nAUICBAgJECAkQICQAAFCAgQICRBIXEj5VyW1c0ebRrZMbTx0TcKuuZx1PBr5ywM3+bKMjaNb\npOX1Dv+rVH/3x68L8XeHrBjWKq1e7/nO0N8dUjkJC2nJETUjd+AdR5iz/jQkdZ+NibrqctZx\np+k/zjHbj2X8kGdOv/bclIyP/d4fuyzE1x3yWd208yaem5r6jt87pJISFdJPmUcuS3fvwHeY\nW+zDf5jRCbrq8tYxsRJ/BUfmEnOPffis6e7z/th1Ib7ukK4h55evPGf6+r1DKilRIf0wOt+K\n3IEPq7nd2ezXwI9fErDLOkaaZT4sIGJUl3z7sCizpc/7Y9eF+LpDJox3DgtSD/V7h1RSIt9s\ncO/A25K7hI8NNn792o9ISIPMhoKvN/i0Btf21OOqwP6ILKQq7JBvzBlVY4fsscSH9IUZHD42\n0cxK4HXvvg7rDHNNrjG/m+HTKhx328+r/N8fkYX4v0O2zGlb8/2qsUP2WOJDWmguCR+7zTyX\nwOvefR1WJ9Nq8uPja5kpPi3DsuamddxZBfZHZCG+75AcY85bURXuIJXhR0iXho/dap5P4HXv\nvg7r9Wc224efptfx6xepPZl+xA9VYX9EFuL7DrnqwmOTOq6oCjukEhIf0jIzKHxsgnktgde9\n+zqK9THv+bKKouvMac4vWfV9fxQvpJhfO8QxJ6ttoe87pFISH9KOlE7hY/2NX7/rtHRIFxlf\nPjcpGmIuK3AGfu+PkoUU82mHuAaYJX7vkMpJfEhW+xpb7MPCJs0TeNVR1vHL/U+Gj3X0582h\nkWZSZOTz/ihZiK875Ju254e3Z5r3/d4hleNDSFPN9fbhA+aGBF51lHUUNs1eam9eMIf7sYZn\nzcjiob/749eF+LtDmqXNsw8/z87e5v8dpDISFdLccePGJTeyD763Co43vW/oFzpkS4Kuurx1\nvBjKGnptn1CthX6sY19zWfjHccZt9Hd/7LoQX3fI88mp/a4ZnGXutXzeIZWUqJAmR34g0vnw\n/JcxLVObXuLPnwXadR3vdKud0mSgP5/mFy/DrPJ3f5RaiJ87xJp3Rv3k2ie/5Ax93SGVxD+j\nAAQICRAgJECAkAABQgIECAkQICRAgJAAAUICBAgJECAkQICQAAFCAgQICRAgJECAkAABQgIE\nCAkQICRAgJAAAUICBAgJECAkQICQAAFCAgQICRAgJECAkAABQgIECAkQICRAgJAAAUICBAip\nGsiZ5fcKQEhB94/j65mUVql9CuMAAARISURBVJO2+b2O3zhCCrjJ5pgbMwd3MP38XshvHCEF\n25b044qcp3Znmvf9XspvGyFVFd8NbVKj7V077dH8M+qmtjxvlT06x6w7OePF4o315eAmqXV7\nzrdP2H5r21rZh9xaaK0wo8KvkRbfsdzqbzZd2CCz/fwtI5tkdVhozzrDrBnaIK31/c7F/+uo\nzIaXb212uI+3sFojpCpifdOcy/7Swwy1rAUZTW6celXNBt9b1vlmQLdJnxRvVjfIHjv9T03T\n37SsP5gBD0zpYy6xH5EO3lr8ZsMgc/INH0zPaNFj3IJnajfMdzo8etzbb3Y10yzrjeRGN9zX\nqVdOe59vZrVFSFXEcPOKfXi6WWzdf8Qce3SPuceyhphTCq2SzSDznH24JPkYy6rRwTnPH88q\nsK4zre/NckMaaobbh33N2fbhSPO2E1J/e/hjep5ldXWe+hV0NoS0lxBS1VBUt3mRvVkxe0P4\naP62181oJ40ZzjF3U5TT0JlidTTfWzlN1hWf8e6GxjQaNCc8zQnqGvOEfXi/ecYJ6UVnyslm\njZVxgDN6mZD2FkKqGr41XUvGj59Q29hGOmkscL7gbtaYkyz32DvW3abW+Y98404vmJvZKsn0\n3WGfsMQ+OtHMtg+nmaeckJY6EwaZDzaZHs7oZ0LaWwipalju3tMd482Rj8599yE3pGXOV9zN\nMtMzfPqlzgPP62dkmVD3L91z5Mz6spu5OzJtorFfQxWH9JVz8ggze7npG56ZTEh7CSFVDZtN\nx8hoW2bzXyznWVjZkL6LPCL9wcxzNttnDQrttyP8lZxZ1k/J3aOF5DxEWeeaRV+ZXs5oC49I\newshVRH16+bbh5/ds3iV6eMcH79bSFadxuHXSO1DmyLnGW7mX99ok/sjQjkdo4X0rDPtaLN+\nR9Khzmg2Ie0thFRFXOC8SW31Mwu3hpzPej5sai4qG9IF5nnnlFAX690mjzlfuMR8MN1cFP5A\n9mkzOlpIp9vDz0Ot7ZhC9sulglMJaW8hpCri60Ypl97Wwwy0rB7moqeuzf1PSrMnN5cO6dtG\n2Vc/dkODmousnQenDbvv/iFJHYsKTjOHXpExoFeo+dpoIZ3cY8r9ec57fjPNPrc9ePygdELa\nSwipqvjyvAaprW4vsKz1A+rnnPSmdUN2o+9Kh2St/kPjlAb9nNc9P4zat0bOoZPsF1Pb726X\na1JaXrLWihbSslFN0tpMd877cOu0ltfkpx3r182r7gipGijvn1GcY74u/YWf3PccoEdI1cDk\nFdG/vktIj5zofBR1t7k1QUv6zSGkamyXkOalN7ph2oiUFptizUflEVI1tutTu7e6NUhtOuRb\nH1dTvRESIEBIgAAhAQKEBAgQEiBASIAAIQEChAQIEBIgQEiAACEBAoQECBASIEBIgAAhAQKE\nBAgQEiBASIAAIQEChAQIEBIgQEiAACEBAoQECBASIEBIgAAhAQL/B1giGDTQqxDZAAAAAElF\nTkSuQmCC"},"metadata":{"image/png":{"width":420,"height":420}}},{"output_type":"display_data","data":{"text/plain":["plot without title"],"image/png":"iVBORw0KGgoAAAANSUhEUgAAA0gAAANICAMAAADKOT/pAAACYVBMVEUAAAABAQECAgIDAwME\nBAQFBQUGBgYHBwcICAgJCQkKCgoLCwsMDAwNDQ0ODg4RERETExMUFBQVFRUXFxcYGBgaGhob\nGxscHBwdHR0eHh4fHx8iIiIkJCQoKCgpKSksLCwtLS0uLi4vLy8xMTEyMjIzMzM0NDQ1NTU2\nNjY4ODg5OTk6Ojo7Ozs8PDw9PT0+Pj5AQEBBQUFCQkJDQ0NERERGRkZHR0dISEhLS0tNTU1O\nTk5PT09QUFBRUVFSUlJTU1NUVFRVVVVXV1dZWVlaWlpbW1tcXFxdXV1eXl5fX19gYGBhYWFi\nYmJjY2NkZGRlZWVmZmZnZ2doaGhpaWlqampra2tsbGxtbW1vb29wcHBycnJzc3N0dHR1dXV3\nd3d6enp7e3t8fHx9fX1+fn6AgICBgYGCgoKDg4OFhYWGhoaHh4eKioqLi4uNjY2Ojo6Pj4+R\nkZGSkpKTk5OWlpaZmZmampqcnJydnZ2enp6fn5+goKChoaGkpKSlpaWmpqanp6eoqKipqamr\nq6usrKyvr6+wsLCxsbGysrKzs7O0tLS1tbW2tra4uLi6urq7u7u9vb2+vr6/v7/AwMDBwcHC\nwsLDw8PExMTGxsbHx8fIyMjJycnKysrLy8vMzMzNzc3Q0NDS0tLT09PU1NTV1dXW1tbY2NjZ\n2dna2trb29vc3Nzd3d3e3t7f39/g4ODh4eHj4+Pk5OTl5eXn5+fo6Ojp6enq6urr6+vs7Ozt\n7e3u7u7v7+/w8PDx8fHy8vLz8/P09PT19fX29vb39/f4+Pj5+fn6+vr7+/v8/Pz9/f3+/v7/\n///YqaAtAAAACXBIWXMAABJ0AAASdAHeZh94AAAcBklEQVR4nO3d/aPedX3f8VPttqq1dyuz\n67q6u9RutdZW55ZEp3EgYKTdpniHYzhhJN6luLp1brXVTgoM1E06daXDOsYcjDWgBBKSkBty\ncvL9q3bOyRLOOZ/39YHr7n1d5+3j8cN1rlyYb758XudJrpNgWBmAqa0s+gagAiHBDAgJZkBI\nMANCghkQEsyAkGAGhAQzMGlIx7c7tXb2+PyszvHa59aem9/FT8/zVNYuzPHiL8zzVNaen9/F\nT8z1VNZObH/hualDOrbdc8OZY/OzNsdrnx+Oz+/ip+Z5KsPqHC9+YZ6nMpye38WfneupDM9s\nf+G4kK4QUkhIESGNJqSQkCJCGk1IISFFhDSakEJCighpNCGFhBQR0mhCCgkpIqTRhBQSUkRI\nowkpJKSIkEYTUkhIESGNJqSQkCJCGk1IISFFhDSakEJCighpNCGFhBQR0mhCCgkpIqTRhBQS\nUkRIowkpJKSIkEYTUkhIESGNJqSQkCJCGk1IISFFhDSakEJCighpNCGFhBQR0mhCCgkpIqTR\nhBQSUkRIowkpJKSIkEYTUkhIESGNJqSQkCJCGk1IISFFhDSakEJCighpNCGFhBQR0mhCCgkp\nIqTRhBQSUkRIowkpJKSIkEYTUkhIESGNJqSQkCKLCekfM0PtqkKKCImudlUhRYREV7uqkCJC\noqtdVUgRIdHVriqkiJDoalcVUkRIdLWrCikiJLraVYUUERJd7apCigiJrnZVIUWERFe7qpAi\nQqKrXVVIESHR1a4qpIiQ6GpXFVJESHS1qwopIiS62lWFFBESXe2qQooIia52VSFFhERXu6qQ\nIkKiq11VSBEh0dWuKqSIkOhqVxVSREh0tasKKSIkutpVhRQREl3tqkKKCImudlUhRYREV7uq\nkCJCoqtdVUgRIdHVriqkiJDoalcVUkRIdLWrCikiJLraVYUUERJd7apCigiJrnZVIUWERFe7\nqpAiQqKrXVVIESHR1a4qpIiQ6GpXFVJESHS1qwopIiS62lWFFBESXe2qQooIia52VSFFhERX\nu6qQIkKiq11VSBEh0dWuKqSIkOhqVxVSREh0tasKKSIkutpVhRQREl3tqkKKCImudlUhRYRE\nV7uqkCJCoqtdVUgRIdHVriqkiJDoalcVUkRIdLWrCimy20K6uN3acOniTov+1KulOd6LwZHP\nzjyvvTaszfHqcz2VnZ/3q35G2m3afzz6GSmy235G2vEjCGne2lWFFBESXe2qQooIia52VSFF\nhERXu6qQIkKiq11VSBEh0dWuKqSIkOhqVxVSREh0tasKKSIkutpVhRQREl3tqkKKCImudlUh\nRYREV7uqkCJCoqtdVUgRIdHVriqkiJDoalcVUkRIdLWrCikiJLraVYUUERJd7apCigiJrnZV\nIUWERFe7qpAiQqKrXVVIESHR1a4qpIiQ6GpXFVJESHS1qwopIiS62lWFFBESXe2qQooIia52\nVSFFhERXu6qQIkKiq11VSBEh0dWuKqSIkOhqVxVSREh0tasKKSIkutpVhRQREl3tqkKKCImu\ndlUhRYREV7uqkCJCoqtdVUgRIdHVriqkiJDoalcVUkRIdLWrCikiJLraVYUUERJd7apCigiJ\nrnZVIUWERFe7qpAiQqKrXVVIESHR1a4qpIiQ6GpXFVJESHS1qwopIiS62lWFFBESXe2qQooI\nia52VSFFhERXu6qQIkKiq11VSBEh0dWuKqSIkOhqVxVSREh0tasKKSIkutpVhRQREl3tqkKK\nCImudlUhRYREV7uqkCJCoqtdVUgRIdHVriqkiJDoalcVUkRIdLWrCikiJLraVYUUERJd7apC\nigiJrnZVIUWERFe7qpAiQqKrXVVIESHR1a4qpIiQ6GpXFVJESHS1qwopIiS62lWFFBESXe2q\nQooIia52VSFFhERXu6qQIkKiq11VSBEh0dWuKqSIkOhqVxVSREh0tasKKSIkutpVhRQREl3t\nqkKKCImudlUhRYREV7uqkCJCoqtdVUgRIdHVriqkiJDoalcVUmR5Qzp6y/6NDx/au+6AkBal\nXVVIkaUN6cEbjmyGdPCejbsU0qK0qwopsrQhfe3pb22G9K6Htr2840cQ0ry1qwopsrQhDcNm\nSBf23vXh9x0+uvHtJx955JFHT2x3ejh3YqdFf+rV0hzvieFi+9rMrJ6c37XPDGfnd/GTcz2V\n4bkdP9rYIT13/WcfffT2659ff3rbnj173vrS321Y9KdeLS/jwEm3dvXZyw1p09kDD6w/fuXQ\noUNHzm33wrB6bqdFf+rV0hzvuWGtfW1m1s7P79oXhgvzu/j5uZ7KsPOVyUIaPvDFK892vHn0\nNdK8tW/YfY0UWfavkZ743OownDvwdSEtSLuqkCJLG9LxYw/sP3bs3Klrjzx19PDB80JakHZV\nIUWWNqSbNn4jdu/dw2Mff/d77vz+1Zd3/AhCmrd2VSFFljakEXb8CEKat3ZVIUWERFe7qpAi\nQqKrXVVIESHR1a4qpIiQ6GpXFVJESHS1qwopIiS62lWFFBESXe2qQooIia52VSFFhERXu6qQ\nIkKiq11VSBEh0dWuKqSIkOhqVxVSREh0tasKKSIkutpVhRQREl3tqkKKCImudlUhRYREV7uq\nkCJCoqtdVUgRIdHVriqkiJDoalcVUkRIdLWrCikiJLraVYUUERJd7apCigiJrnZVIUWERFe7\nqpAiQqKrXVVIESHR1a4qpIiQ6GpXFVJESHS1qwopIiS62lWFFBESXe2qQooIia52VSFFhERX\nu6qQIkKiq11VSBEh0dWuKqSIkOhqVxVSREh0tasKKSIkutpVhRQREl3tqkKKCImudlUhRYRE\nV7uqkCJCoqtdVUgRIdHVriqkiJDoalcVUkRIdLWrCikiJLraVYUUERJd7apCigiJrnZVIUWE\nRFe7qpAiQqKrXVVIESHR1a4qpIiQ6GpXFVJESHS1qwopIiS62lWFFBESXe2qQooIia52VSFF\nhERXu6qQIkKiq11VSBEh0dWuKqSIkOhqVxVSREh0tasKKSIkutpVhRQREl3tqkKKCImudlUh\nRYREV7uqkCJCoqtdVUgRIdHVriqkiJDoalcVUkRIdLWrBiEt+iaLEVJBQsonpIKElE9IBQkp\nn5AKElI+IRUkpHxCKkhI+YRUkJDyCakgIeUTUkFCyiekgoSUT0gFCSmfkAoSUj4hFSSkfEIq\nSEj5hFSQkPIJqSAh5RNSQULKlxHS2e3OD6tnd1r0MdTSHO/ZYc2Rz1dzvms7P+/PTh3Sqe3O\nDC+c2mnRx1BLc7ynhouOfL6a810dTm9/4fTUIXlrl8xbu3wZb+2ElExI+YRUkJDyCakgIeUT\nUkFCyiekgoSUT0gFCSmfkAoSUj4hFSSkfEIqSEj5hFSQkPIJqSAh5RNSQULKJ6SChJRPSAUJ\nKZ+QChJSPiEVJKR8QipISPmEVJCQ8gmpICHlE1JBQsonpIKElE9IBQkpn5AKElI+IRUkpHxC\nKkhI+YRUkJDyCakgIeUTUkFCyiekgoSUT0gFCSmfkAoSUj4hFSSkfEIqSEj5hFSQkPIJqSAh\n5RNSQULKJ6SChJRPSAUJKZ+QChJSPiEVJKR8QipISPmEVJCQ8gmpICHlE1JBQsonpIKElE9I\nBQkpn5AKElI+IRUkpHxCKkhI+YRUkJDyCakgIeUTUkFCyiekgoSUT0gFCSmfkAoSUj4hFSSk\nfEIqSEj5hFSQkPIJqSAh5RNSQULKJ6SChJRPSAUJKZ+QChJSPiEVJKR8QipISPmEVJCQ8gmp\nICHlE1JBQsonpIKElE9IBQkpn5AKElI+IRUkpHxCKkhI+YRUkJDyCakgIeUTUkFCyiekgoSU\nT0gFCSmfkAoSUj4hFSSkfEIqSEj5hFSQkPIJqSAh5RNSQULKJ6SChJRPSAUJKd9sQzp6y/6N\nD6c/c+O1d/xASIsipHwzDenBG45shnTnrY8/+emb14S0IELKN3FIex65/PEPf/HF17729Lc2\nQjq277H1n5Xe/rCQFkRI+SYOaeWhzQ+rd/zFra9uhvTNd15af/zgl4S0IELKN2FIKy/6O01I\n97934+ltn19/+N33v//9//zCdqvD2oWdFn0MtTTHe2G45MjnqznfS8OOF16IQnr4t1f237Th\nNz/x521IB6+GdNuePXveOry0RR9DLS/jwB35jL30gV/9NYPtb+3e9r+i//FmSN++/Nbuy1de\n9NYumbd2+SZ8azfKZkjP7vveMJzc/10hLYiQ8k0c0g9uvOYVl79IevG148ce2H/s2Lnhkx95\n/OjtH70kpAURUr6JQzrwo2+5cfOrpJtefO2mvRvuHs4cueG6wy9+PyElE1K+iUP6qa+89Bs9\nIS2GkPJNHNKrnxbSshJSvolDetN/FtKyElK+iUP601/+ppCWlJDyTRzSG39u5dU/v0lIy0ZI\n+SYO6U1vuUJIy0ZI+SYOaQxCSiakfEIqSEj5Jg7pp654rZCWjZDyTRzS/k2//KrX3yykZSOk\nfBOH9P899Wv3CmnZCCnftCEND+0R0rIRUr6pQ3rqVUJaNkLKN21Ilw69TkjLRkj5Jg7pb216\n/U+vfExIy0ZI+aYM6W//xm+/0IQjpAUTUr6JQxqDkJIJKd8UIT1z7+f/zf2nhLR8hJRv4pDW\nbvkLG39gw2s+JaSlI6R8E4f0qZV3/Nv/dO/vvG3l3wtp2Qgp38Qh/eJHL3/8J9v+pFUhLQMh\n5Zs4pL/0tcsf7/MbsktHSPkmDuk191z++JUfF9KyEVK+iUP61V/f/A2kc3//zUJaNkLKN3FI\n9/3IX/1nd/6r37rmFV8V0rIRUr6JQxr+41/f+OXvv3HfS3YkpGxCyjd5SMPw5J889P2XzkhI\n6YSUb/KQnrpr/eHpLf/NZSEtCyHlmzik//mzG//NyydWfvYxIS0bIeWbOKS3/8KfbHx45Bf+\nkZCWjZDyTRzSz/zu5Y+/408RWjpCyjdxSK/6D5c//t6rhbRshJRv4pB+5W0XNz6cesMbhbRs\nhJRv4pDu/5G/dvPtnzj4M6+4X0jLRkj5Jg5peGDPxm/I/s37XrIjIWUTUr7JQxqGZ77zP17O\n/0FWSNmElG+akF4uISUTUj4hFSSkfEIqSEj5hFSQkPIJqSAh5RNSQULKJ6SChJRPSAUJKZ+Q\nChJSPiEVJKR8QipISPmEVJCQ8gmpICHlE1JBQsonpIKElE9IBQkpn5AKElI+IRUkpHxCKkhI\n+YRUkJDyCakgIeUTUkFCyiekgoSUT0gFCSmfkAoSUj4hFSSkfEIqSEj5hFSQkPIJqSAh5RNS\nQULKJ6SChJRPSAUJKZ+QChJSPiEVJKR8QipISPmEVJCQ8gmpICHlE1JBQsonpIKElE9IBQkp\nn5AKElI+IRUkpHxCKkhI+YRUkJDyCakgIeUTUkFCyiekgoSUT0gFCSmfkAoSUj4hFSSkfEIq\nSEj5MkJ6ZruTw9lndlr0MdTSHO8zw6ojn6/mfC8Mz25/4cTUIa1ud3FYW91p0cdQS3O8q8Ml\nRz5fzfle2vl5f2HqkLy1S+atXb6Mt3ZCSiakfEIqSEj5hFSQkPIJqSAh5RNSQULKJ6SChJRP\nSAUJKZ+QChJSPiEVJKR8QipISPmEVJCQ8gmpICHlE1JBQsonpIKElE9IBQkpn5AKElI+IRUk\npHxCKkhI+YRUkJDyCakgIeUTUkFCyiekgoSUT0gFCSmfkAoSUj4hFSSkfEIqSEj5hFSQkPIJ\nqSAh5RNSQULKJ6SChJRPSAUJKZ+QChJSPiEVJKR8QipISPmEVJCQ8gmpICHlE1JBQsonpIKE\nlE9IBQkpn5AKElI+IRUkpHxCKkhI+YRUkJDyCakgIeUTUkFCyiekgoSUT0gFCSmfkAoSUj4h\nFSSkfEIqSEj5hFSQkPIJqSAh5RNSQULKJ6SChJRPSAUJKZ+QChJSPiEVJKR8QipISPmEVJCQ\n8gmpICHlE1JBQsonpIKElE9IBQkpn5AKElI+IRUkpHxCKkhI+YRUkJDyCakgIeUTUkFCyiek\ngoSUT0gFCSmfkAoSUj4hFSSkfEIqSEj5hFSQkPIJqSAh5RNSQULKJ6SChJRPSAUJKZ+QChJS\nPiEVJKR8QipISPmEVJCQ8gmpICHlE1JBQsonpIKElE9IBQkp31xC+tDedQeEtChCyjeXkA7e\ns/79nhXSoggp31xCetdD274ppGRCyjePkC7svevD7zt8dOPpn331q1/9xqntzgwvnNpp0cdQ\nS3O8p4aLjny+mvNdHU5vf+H02CE9d/1nH3309uufX3962549e976Mr7Loo+hlpe10qJvspiX\nPvC1q8/G+lW7swceWH/8xhe+8IU/eH67c8OF53da9DHU0hzv88OaI5+v5nwvDme2v3BmspCG\nD3zxyjNfIyXzNVK+eXyN9MTnVofh3IGvC2lBhJRvHiGduvbIU0cPHzwvpAURUr55hDQ89vF3\nv+fO71/9ppCSCSnfXELaQUjJhJRPSAUJKZ+QChJSPiEVJKR8QipISPmEVJCQ8gmpICHlE1JB\nQsonpIKElE9IBQkpn5AKElI+IRUkpHxCKkhI+YRUkJDyCakgIeUTUkFCyiekgoSUT0gFCSmf\nkAoSUj4hFSSkfEIqSEj5hFSQkPIJqSAh5RNSQULKJ6SChJRPSAUJKZ+QChJSPiEVJKR8QipI\nSPmEVJCQ8gmpICHlE1JBQsonpIKElE9IBQkpn5AKElI+IRUkpHxCKkhI+YRUkJDyCakgIeUT\nUkFCyiekgoSUT0gFCSmfkAoSUj4hFSSkfEIqSEj5hFSQkPIJqSAh5RNSQULKJ6SChJRPSAUJ\nKZ+QChJSPiEVJKR8QipISPmEVJCQ8gmpICHlE1JBQsonpIKElE9IBQkpn5AKElI+IRUkpHxC\nKkhI+YRUkJDyCakgIeUTUkFCyiekgoSUT0gFCSmfkAoSUj4hFSSkfEIqSEj5hFSQkPIJqSAh\n5RNSQULKJ6SChJRPSAUJKZ+QChJSPiEVJKR8QipISPmEVJCQ8gmpICHlE1JBQsonpIKElE9I\nBQkpn5AKElI+IRUkpHxCKkhI+YRUkJDyCakgIeXLCOn8dheGi+d3WvQx1NIc7/lhzZHPV3O+\nazs/789PHdKJ7U4P507stOhjqKU53hPDRUc+X835rg7PbX/h5NQheWuXzFu7fBlv7YSUTEj5\nhFSQkPIJqSAh5RNSQULKJ6SChJRPSAUJKZ+QChJSPiEVJKR8QipISPmEVJCQ8gmpICHlE1JB\nQsonpIKElE9IBQkpn5AKElI+IRUkpHxCKkhI+YRUkJDyCakgIeUTUkFCyiekgoSUT0gFCSmf\nkAoSUj4hFSSkfEIqSEj5hFSQkPIJqSAh5RNSQULKJ6SChJRPSAUJKZ+QChJSPiEVJKR8QipI\nSPmEVJCQ8gmpICHlE1JBQsonpIKElE9IBQkpn5AKElI+IRUkpHxCKkhI+YRUkJDyCakgIeUT\nUkFCyiekgoSUT0gFCSmfkAoSUj4hFSSkfEIqSEj5hFSQkPIJqSAh5RNSQULKJ6SChJRPSAUJ\nKZ+QChJSPiEVJKR8QipISPmEVJCQ8gmpICHlE1JBQsonpIKElE9IBQkpn5AKElI+IRUkpHxC\nKkhI+YRUkJDyCakgIeUTUkFCyiekgoSUT0gFCSmfkAoSUj4hFSSkfEIqSEj5hFSQkPIJqSAh\n5RNSQULKJ6SChJRPSAUJKZ+QChJSPiEVJKR8QipISPmEVJCQ8gmpICHlE1JBQsonpIKElE9I\nBQkp31xCOv2ZG6+94wdCWhQh5ZtLSHfe+viTn755TUgLIqR88wjp2L7H1n9WevvDQloQIeWb\nR0jffOel9ccPfklICyKkfPMI6f73bjze9vn1h8/s27fv+ovbrQ2XLu606GOopTnei4583prz\nvTTseGF1/JAOjh3S7Oy8/VlqzmaW1uZ6KvO8+KW1+V17bZjnxed6KtOH9O3Lb+2+fOXbL+Ot\n3eyszfHa54fj87v4qXmeSvDWbnYuzPNUhtPzu/izcz2V6d/aPbvve8Nwcv93hTQOIUV+qEMa\nPvmRx4/e/tFLQhqHkCI/3CGdOXLDdYdf/H47fgQhhYQU+eEOaYcdP4KQQkKKCElIYxJSREhC\nGpOQIkIS0piEFBGSkMYkpIiQhDQmIUWEJKQxCSkiJCGNSUgRIQlpTEKKCElIYxJSREhCGpOQ\nIkIS0piEFBGSkMYkpIiQhDQmIUWEJKQxCSkiJCGNSUgRIQlpTEKKCElIYxJSREhCGpOQIkIS\n0piEFBGSkMYkpIiQhDQmIUWEJKQxCSkiJCGNSUgRIQlpTEKKCElIYxJSREhCGpOQIkIS0piE\nFBGSkMYkpIiQhDQmIUWENNrjh/7LbC6U7u5Dzy76FiZ06N8t+g4m9J1Df7roW5jQ7x16YdRf\nmlFI/23Pv57NhdJ9Ys//XfQtTOiXblz0HUzovj1fWvQtTOgDe86M+ktCElI2IY0mpHxCSiek\n0YSUTkhATEgwA0KCGRASzMD0IZ3+zI3X3vGDy88/tHfdgakvmWHrbW99vvx26YFvOHrL/itP\nd9eZb7nxEUc+fUh33vr4k5++eW3z+cF7Nv4ljakvmWHrbW99vvx26YGve/CGI1c/H3fVmW+9\n8RFHPnVIx/Y9tv6Pl7c/vPmNdz007eWybL3tbX8LS2+XHviGrz39rSufj7vrzLfc+Kgjnzqk\nb77z0vrjBzd/Z+DC3rs+/L7DR6e9ZIatt731+fLbpQd+2dXPx9115ltufNSRTx3S/e/deLzt\n8xuPz13/2Ucfvf3656e9ZoKtt731+fLbpQd+2dXPx9115ltufNSRTxPSH+/fv/+R+w9uPN1y\nImcPPDDFNbNsve3mb2Gp7dIDv+zFkHbVmW+58U3BkU8T0pknnnji/Lcv/xz95Rdf/sAXp7hm\nlq233f4tLLNdeuCXXf183F1nvjOk4Minfmv37L7vDcPJ/d/deP7E51aH4dyBr097zQRbb3vr\n8+W3Sw/8squfj7vrzLfc+Kgjn/6Xvz/5kceP3v7RS8MDfzScuvbIU0cPHzw/9TUTbLntq893\nh1164OuOH3tg/7Fj53bfmW+58VFHPn1IZ47ccN3h48PwqY8Pw2Mff/d77vz+1JfMsPW2rzzf\nHXbpga+7aeP3MvfevfvOfOuNjzhy/4oQzICQYAaEBDMgJJgBIcEMCAlmQEgwA0KCGRASzICQ\nYAaEBDMgpF3m99/wqtfu+f31J2/61Qff8GPXfOrCrdf8+FseW/RdIaTd5Q9W3nHvvf9g5d5h\neMvrfv2///k7Vt56x9Fv/MQ/XPRtIaTd5fBvvDAMJ3/0uvWQVh4ehj9e+ZX1F697zaJvCyHt\nRq9703pIG/X875WPrT9+bOXUou/oh56QdpeT//L1P/HKV668cT2kn1//5v9Z+eT6460rJxZ8\nWwhpd/m1V/6LB7/zZ9cIadkIaVf53spvrT+u/piQlo2QdpVHVu5Yf7xr5e8KackIaVe58HN/\n5e7/esub3/zarz8vpKUipN3lob/36r/8T0/e89M/+aiQloqQYAaEBDMgJJgBIcEMCAlmQEgw\nA0KCGRASzICQYAaEBDMgJJgBIcEM/D9wghstax8PGwAAAABJRU5ErkJggg=="},"metadata":{"image/png":{"width":420,"height":420}}}]}]}