Nothing
knitr::opts_chunk$set( collapse = TRUE, comment = "#>" )
library(ODataQuery) service <- ODataQuery$new("https://services.odata.org/V4/TripPinServiceRW") people_entity <- service$path("People")
There are three ways to query data using this package.
The most direct way is to directly write your query in OData.
people_entity$filter("Concurrency gt 500") people_entity$filter("Friends/any(f: f/FirstName eq 'John')")
and_query
, or_query
and not_query
people_entity$filter(Concurrency.gt = 500) people_entity$filter(or_query(Concurrency.lt = 500, Concurrency.gt = 1500))
to_odata
people_entity$filter(to_odata(Concurrency > 500)) name <- 'John' people_entity$filter(to_odata(Friends$any(f ~ f$FirstName == !!name)))
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.