From df910d0d4112566ed3c415fddc03429eb87ed427 Mon Sep 17 00:00:00 2001 From: Raffaele Mancuso Date: Tue, 4 Feb 2025 12:48:33 +0100 Subject: [PATCH] Fix checks Fixes #314 --- DESCRIPTION | 2 +- R/oa_fetch.R | 10 +++++----- data-raw/coverage-works.csv | 3 ++- data-raw/gen-data.R | 5 ++++- data/concept_abbrev.rda | Bin 672 -> 677 bytes data/oa2df_coverage.rda | Bin 2421 -> 2441 bytes man/oa_fetch.Rd | 10 +++++----- man/oa_random.Rd | 10 +++++----- man/snowball2df.Rd | 5 +---- tests/testthat/test-oa_fetch.R | 9 ++++----- 10 files changed, 27 insertions(+), 27 deletions(-) diff --git a/DESCRIPTION b/DESCRIPTION index ff53ac9..92237d7 100644 --- a/DESCRIPTION +++ b/DESCRIPTION @@ -54,4 +54,4 @@ LazyData: true RoxygenNote: 7.3.2 Config/testthat/edition: 3 Depends: - R (>= 2.10) + R (>= 3.5) diff --git a/R/oa_fetch.R b/R/oa_fetch.R index 98dd75d..050fbe2 100644 --- a/R/oa_fetch.R +++ b/R/oa_fetch.R @@ -22,11 +22,11 @@ oa_entities <- function() { #' The argument is ignored if entity is different from "works". #' @param output Character. #' Type of output, one of `"tibble"`, `"dataframe"`, `"list"`, or `"raw"`. -##' \itemize{ -##' \item{"tibble"}: {a tibble tidy data} -##' \item{"dataframe"}: {a base data.frame tidy data} -##' \item{"list"}: {a list of parsed JSON contents} -##' \item{"raw"}: {a list of raw JSON strings (length depends on query)} +##' \describe{ +##' \item{tibble}{a tibble tidy data} +##' \item{dataframe}{a base data.frame tidy data} +##' \item{list}{a list of parsed JSON contents} +##' \item{raw}{a list of raw JSON strings (length depends on query)} ##' } #' #' @return A data.frame or a list. Result of the query. diff --git a/data-raw/coverage-works.csv b/data-raw/coverage-works.csv index 0182d81..ab9d6ac 100644 --- a/data-raw/coverage-works.csv +++ b/data-raw/coverage-works.csv @@ -1,5 +1,6 @@ original,oa2df,comment abstract_inverted_index,abstract,reconstructed from inverted index +abstract_inverted_index_v3,NA, apc_list.currency,apc.currency, apc_list.provenance,apc.provenance, apc_list.value,apc.value, @@ -83,4 +84,4 @@ topics,topics, type,type, type_crossref,NA, updated_date,NA, -versions,NA, \ No newline at end of file +versions,NA, diff --git a/data-raw/gen-data.R b/data-raw/gen-data.R index fde1f63..a92d67e 100644 --- a/data-raw/gen-data.R +++ b/data-raw/gen-data.R @@ -1,3 +1,5 @@ +source("./R/oa_fetch.R") + # concept_abbrev <- tibble::tribble( # ~id, ~display_name, ~abbreviation, # "https://openalex.org/C41008148", "Computer science", "Comput Sci", @@ -47,7 +49,8 @@ concept_abbrev <- tibble::tribble( oa2df_coverage <- list() for (entity in setdiff(oa_entities(), "concepts")) { oa2df_coverage[[entity]] <- readr::read_csv( - sprintf("data-raw/coverage-%s.csv", entity) + sprintf("data-raw/coverage-%s.csv", entity), + show_col_types = FALSE ) } diff --git a/data/concept_abbrev.rda b/data/concept_abbrev.rda index bdfa93a602f2608a6bbc8fbbcb2c2265806e382c..8d3c7f40a1467dc3656cd542974632a450a7afd6 100644 GIT binary patch literal 677 zcmV;W0$Tk-T4*^jL0KkKSuvUh<^TcH|H1$N{tZkQ|L{NKUO>O+-{3$100aO5zyf;h zsoYn014PQFv;{Vk)CMM+01X4w(@g`^c})T88a)USi8RP2(w?WHWEyAy0000001W~~ z3N;T?Mt~YLJspn(i#8&0j8P&Gyoc8RB;QM*cZiV2~}wY zENay8MO4t2m+$4kkCqhW_U2Fl5Uyk)r{?7^g$qoK5$TGb`^AZ_h>hCqG&mI{dtV&k zty$!=Zq*Nynn__%t(oweGp-v_87d+gf*=eMO$Vv~e%WQj;}aO`j<1a#4A zRKKLCEzpwSz4-LqbUOp^cRM{!38-VDC}2c<&dvJWt_S;@vvjUl|8`Ktc7mTj()$)JMs2kEhj3O%g>_iUn#P zMlc~)09BPsr6eklh#^7Br$`{+F2s!_?i@i$y;ObS_6flZ+V;T@$&x@qm^#A=H9)?N zcvJKcaKcSV6$AdfpC7L$GQkT;DVwmM@vN+ z!=_>bi{lX#9`Hj-zP5BA5-2hQky};5##6AULPgo7FyTT`$ZIye_{_1&EzHLYK#JfX zig+Z90v0TQLpfw*n$`oL5LVk`NwC?Ct22XWD;7c$>NZHi%G_}pkGu$81TZF=4qFqH zL{c^rF^=Binmct16Q+^X0u7-aVuBLetkY$3%4QWXp;k5m3v7DW6jg)>8QAuSA=@8; literal 672 zcmV;R0$=??T4*^jL0KkKSp&Ln^8f+Q|H1$N{tZkO|L{NKTtL6)-{3$100aO5zyfOCXL2dEx^4H|>e2EvU1uU`s`LLjWr zl`Lx1Q6eof(H30PNpAlqS^`)=;V zt9DkK3eHqIkyWo?9o1W2-|!)z5TFpk2xtT|tZ2D_R%e#N46aqa=;LO zpzfW^QU!@G#Xm&eoXa=)8RRM5PNJ=*2{#rcNtH01yEL04RV# z;0&KW>@on^g#`r)pd=Ik1GWGP5H$)k4FCWD00w{>000008UzzU2{d3qrb7S(88l#l ziGTnE$Oi*Pj6tJJm_djPMkb9KGy$fX0001RG-$*cG|7Y*fW%^G(W5{bX`lcA0wko; z88p;3rYES)LFxgZdVl~l&;S6)G6hKpOoVALnhcF55@u3)F%3+EKy6H#9;4LqK-!so z@^u3Lib)+KNkXOM;w}pU!O$}k0(0P&8d!|!B22L?64)r_wERT!L}UPwLvL<^qf_ZD zfPElkAq+(pq@r5zIY+gbT=Y1}Dk7%CYvy;AjMtwmz>DNCm+LiHQ=ZMy9l49UAjnp&#Z&oXdD z{Yd{kufh-P`(gaMweH;ie?I0t&Zh61J@M}F^urk9unmG2I^1Oo0puWD5{p>(%Smb{ zb%m6rOH&@rw-Q}%2rqiRi^`g6H!{x3wslNjIZwiTwIxE!xMsUj$*PZ0&2lz^u}Y+> zl2r}%)=d!AxVv31FOussXv%OINSia;A)0EW&pSxbJP~I#F;`yGMRV>=%hETkzZ_mT z=JiRUL4`B~RLoFlX3g;Zt|3om$nROaRN+WWC6bj&l%r&^zl^wb$w7<%dT&1<%Xpz1 zB8$AIQ8GT?mv<-de%J1J|8_oW-uL!@9`E4ZPMDl&?1ReaT3Ol>)63Vpxnt8Lk0Nbq zDJm5wq{Dmh@2N=?HnVd(GhD<;>>sS*(f+Lg@w`4G&*;B@0W*(_Ly>{1JH@V&uA&!s ziV>hFrO!lx3sT)DVoFO(I`0>~DRXodewK~vmVO+b0rzf4dY?5&`3JNf*gxQTWc`D@ zGtyU%J_YGqKMP34k(UWaWZlcK` zMi3zd(H-=l0~3;(2QOa!SyHB+PF}hhlaBPcyC#V0jv#0dz;jNS`Z>nQgu-es6&;Q) zkHM=(3=cnx5blEWJeHrDy41k#A3WXfQ}308+Hy+yaSw4k3_Y)37pTnmNjl8eOfWnTX#9?kD!J7Mpq!Ho`p3aJ zlSq#ri*%_}s|M#r1u(-wc%uz}d2!)GyV>tvxMzj@kT4ZWB!cptj)SUsyp_q)x0&?I zPpjUyTiwuhgW$;dDN5F|GI|nDlyy$EiE@vSnfFgrd&%W?q?Jj4rIjruC7$77?@+xM zz*opKPlqjBez&t66!}46$k&8dI2PfEqOxZ(5l@wp zS{G8f5`xUqa3Rg+wir3dvRJ%mv~aQ|*izDYkx6APlTTw3G?^mNp)M5(QtDYIY9%iz zg<&sBQdViGdTi_A-&`kuH)N5}d8B)9CTVe$P>1DOE_;RpoQcV3?Kd$Z@uUBKf6erA zN#K)R#eukREeTa7PRE`zI|-G1L5P#tk-BE(HkT$Ol6Apy)Xk~lN~KBcd7?X#dii)m zd>%8XmXI-jAu^~V?2*11p4!(6kPoSzb>OwlJ(fj^?(KXYOFxrYF8Hk{T-tCE~0oM^ikCNEXX zSd-bKp&jz0^YE(R^TP1`aM#~j9y$~DSD;c$Dip0_3sTZc(RVmty|~&W^pDmx84%6k zT|1;ONo6IGyAW?pl^H5@jZ>|YMtc+{YEq(9Q);)w+%C-&Z$o z(;K6n{=TWyX6(yHJHq6;(YKPPVDcohQXdIO=XASOJxfTSrQNF$)C_o+B%pK^u)2oO znwDNnNcvSBNQn4ihFCdBgWiev+5`Lrf*}=BmswEeDnKT} Hu+~)gzJ!=R literal 2421 zcmV-*35xbYT4*^jL0KkKS;NddBLESv|I`2f|Ns8Adw>K0Qb7Oz-|#>H00;pD04RV# z;0&KWf07$Ap7_n4PEr5u?CSI3K z9gkA+mH(jZ9xn#FW|d*3+p(}-cPz^OYj{;Jz+T&}RYj_<6pkw?!MWm`ZP874Yj5Yw zEzOCOd{s4B&Kg;ip`04YcKEVdWo5Fk*6-oVe8w~Am|Xl>V!ly^`LStLDtk9+jw=-? zve8Z3Z(OA>S*eUOZef$}bgWpW_Q|g1omu9pUwt#IRLxADM+`BgNy$z+pG&c3d)CVP zjTlnSpD5_VpFLE+)K#lm;T_@A%v=jJ-on&Y)hd;GE&C!P!<%%ppzq_q>a!pc&msgDh}5?yaZ z7rkFaU9Ojx z$#t2uWjG9^O_}YG%{5YIoup`DN3T%Dp!G0(nzsVOGD)xwn;nEZ+9tDc?W3W zcZsFpC_lap&IS`52R*8)td&V;?_~>x;UmCZ4UBSaCb}!q!QI7HA!Hef@g-ZAw>4d7 zZdu>vTQcfQVQ5^wnJYE(UpX{f(Yd8)&5S9Mm}zOPYgp&hzQm-`_ghTvq}eDoGux_7 zQS`|;B;N%_U~1%u4}p$I;3PBxgyiVDU_sp>s01tp^53EtGKT5K3oPdgi_51L=rq%1 znEb{>w*2FU%Q$Pb*R>g`g-ozg_$|EW=oJjlhK!qPYjqY%qNOOML#8>>fDLzMng-q8 zMY5$$ZJoSmchhOf)$JN%g~er7V)wmT z{w4jwoo>_Op0AJ8!eo=I&2+;9#P*Ms(cG>|gTS2WhJ9n;oXMm|m&v+Rs#Sw?qY)gb zte$kIr}(ivl=}X!>$W!={3znJq(xFYj>kdOJpO9ubgk!piD~tF*6Vw^4$yoVA2lgj z)<#bRlcgO~tzulG<|clb@khL!&eW2rFch+-q@=UlEIsNMqZkVLhH3EU)yM05F~Luq z798fhBDn!>7>X+=Co)YlJN9NRGcbxX+y~HJBZr#OYS&E$g2>=dyLigcnp~DVmLuOH zR^;T}YLHb8k&t6Si0->N69KpAS+8ucwJlar7GSpIRK!!~WR`{0u7seoG@J-?dF_S{ zMAu5Y6LVJESm4YD*(_Al{oQGF0gr zr&}hB_9#r$r9`Nv)o)vHyEIX~7wMc~`}u&%XyW5&L~uyiReeT}+gju?pV#S38CL>=gv nctFerf*}P`mlC14sQ{f7wQh