Filtr dle unikátních hodnot tibble v R

C++, C#, Visual Basic, Delphi, Perl a ostatní

Moderátor: Moderátoři Živě.cz

Odeslat příspěvekod jednadva 5. 8. 2020 12:02

Nevíte jak mám chytře vyfiltrovat tibble v R podle unikátních hodnot ve sloupci, abych nemusel každou unikátní hodnotu zadávat do filtru ručně?

Mám tibble nominálních kurzů 38 měn k euru:
Kód: Vybrat vše
library(quantmod)
library(eurostat)
library(zoo)
library(tbl2xts)
library(xts)
library(dplyr)
library(urca)

e=get_eurostat("ert_bil_eur_d")

names(e)=c("statinfo","unit","currency","date","values")


Kód: Vybrat vše
> e
# A tibble: 293,673 x 5
   statinfo unit  currency date       values
   <chr>    <chr> <chr>    <date>      <dbl>
1 AVG      NAC   ARS      2020-08-04  85.2
2 AVG      NAC   AUD      2020-08-04   1.65
3 AVG      NAC   BAM      2020-08-04   1.96
4 AVG      NAC   BGN      2020-08-04   1.96
5 AVG      NAC   BRL      2020-08-04   6.27
6 AVG      NAC   CAD      2020-08-04   1.58
7 AVG      NAC   CHF      2020-08-04   1.08
8 AVG      NAC   CNY      2020-08-04   8.22
9 AVG      NAC   CZK      2020-08-04  26.2
10 AVG      NAC   DKK      2020-08-04   7.45
# ... with 293,663 more rows
>


Chtěl bych teď filtrovat tibble podle seznamu symbolů pro jednotlivé měny

Kód: Vybrat vše
u=unique(e[,"currency"])


Kód: Vybrat vše
> print(as.list(u))
$currency
[1] "ARS" "AUD" "BAM" "BGN" "BRL" "CAD" "CHF" "CNY" "CZK" "DKK" "GBP" "HKD"
[13] "HRK" "HUF" "IDR" "ILS" "INR" "ISK" "JPY" "KRW" "MXN" "MYR" "NOK" "NZD"
[25] "PHP" "PLN" "RON" "RUB" "SEK" "SGD" "THB" "TRY" "TWD" "USD" "ZAR" "ALL"
[37] "MKD" "RSD"
>
,

abych se souborem mohl pracovat jako s vícerozměrnou časovou řadou a mohl na něm provádět panelové/vícerozměrné testy (např. kointegrace).
jednadva
Kolemjdoucí

Kdo je online

Uživatelé procházející toto fórum: Žádní registrovaní uživatelé a 0 návštevníků