"Unknown or uninitialized column" warning

[pmaier1971]

Running into issues on a virtual Windows server with R (4.1.3). The atr package installs without issues, and authentication works fine. Retrieving skeets yields the expected results (e.g. your example feeds <- get_feeds_created_by(actor = "andrew.heiss.phd" works without errors).

But, I’m running into an issue when posting:

Although the response claims that the message was posted, it never shows up on the feed.

If helpful, here’s the output from sessionInfo:

[JBGruber]

Not sure what could cause this. But you are using a pretty old version of httr2. Could you update the package (current version 1.0.0) and see if the error persists?

[pmaier1971]

Thanks for the quick reply. It didn’t fix it, but the package now seems to work. That said, a callout and a question: Callout: I am not sure how to use Sys.setenv(BSKY_TOKEN = "filename.rds”). A extra line of explanation (or an example) in the reference guide may be helpful - I ran into issues. And, my question: I know that I can search for a specific topic on Bluesky (say, “Twitter”), but I don’t think that there’s a function in the package, correct? Checking the API it also does not seem like a proper search is supported. Lastly: THANK YOU for putting together the package! I was just about to write something myself, so you saved me plenty of time. Philipp

…

On Dec 3, 2023, at 5:28 AM, Johannes Gruber ***@***.***> wrote: Not sure what could cause this. But you are using a pretty old version of httr2. Could you update the package (current version 1.0.0) and see if the error persists? — Reply to this email directly, view it on GitHub <#7 (comment)>, or unsubscribe <https://github.com/notifications/unsubscribe-auth/ABB6ORL2QWNI2LHYDRNF3X3YHRH5RAVCNFSM6AAAAABAEDFBPSVHI2DSMVQWIX3LMV43OSLTON2WKQ3PNVWWK3TUHMYTQMZXGQZTMMZZHA>. You are receiving this because you authored the thread.

[JBGruber]

What do you mean by:

It didn’t fix it, but the package now seems to work.

Sys.setenv(BSKY_TOKEN = "filename.rds”) can be used to manage identies, if you have several. I added an example to make it clearer.

The search endpoint did not work when we wrote the package (see #2), but it seems to be working now. You can use the unexported auto-generated function to use it now, or wait until we implement it:

res <- atr:::app_bsky_feed_search_posts("rstats", limit = 1L)
lobstr::tree(res)
#> <list>
#> ├─posts: <list>
#> │ └─<list>
#> │   ├─uri: "at://did:plc:kizxn77jkp4p5vqzapb..."
#> │   ├─cid: "bafyreifshqa44iqg5g6xl2j2clfaif7..."
#> │   ├─author: <list>
#> │   │ ├─did: "did:plc:kizxn77jkp4p5vqzapbedvg2"
#> │   │ ├─handle: "pmaier1971.bsky.social"
#> │   │ ├─displayName: "Philipp Maier"
#> │   │ ├─avatar: "https://cdn.bsky.app/img/avatar/..."
#> │   │ ├─viewer: <list>
#> │   │ │ ├─muted: FALSE
#> │   │ │ └─blockedBy: FALSE
#> │   │ └─labels: <list>
#> │   ├─record: <list>
#> │   │ ├─text: "Manufacturers' New Orders for Du..."
#> │   │ ├─$type: "app.bsky.feed.post"
#> │   │ ├─embed: <list>
#> │   │ │ ├─$type: "app.bsky.embed.images"
#> │   │ │ └─images: <list>
#> │   │ │   └─<list>
#> │   │ │     ├─alt: "US.Activity.ManufacturingOrdersD..."
#> │   │ │     └─image: <list>
#> │   │ │       ├─$type: "blob"
#> │   │ │       ├─ref: <list>
#> │   │ │       │ └─$link: "bafkreifg56uwi6qxh63mreusf2bbq63..."
#> │   │ │       ├─mimeType: "image/png"
#> │   │ │       └─size: 549452
#> │   │ ├─facets: <list>
#> │   │ └─createdAt: "2023-12-04T15:15:25.786920Z"
#> │   ├─embed: <list>
#> │   │ ├─$type: "app.bsky.embed.images#view"
#> │   │ └─images: <list>
#> │   │   └─<list>
#> │   │     ├─thumb: "https://cdn.bsky.app/img/feed_th..."
#> │   │     ├─fullsize: "https://cdn.bsky.app/img/feed_fu..."
#> │   │     └─alt: "US.Activity.ManufacturingOrdersD..."
#> │   ├─replyCount: 0
#> │   ├─repostCount: 0
#> │   ├─likeCount: 0
#> │   ├─indexedAt: "2023-12-04T15:15:25.786Z"
#> │   ├─viewer: <list>
#> │   └─labels: <list>
#> ├─cursor: "1"
#> └─hitsTotal: 1569

^{Created on 2023-12-04 with reprex v2.0.2}

[JBGruber]

I was too excited that search finally works and implemented it right away:

library(atr)
search_post("rstats", limit = Inf)
#> ℹ Found 1569 posts that fit the query
#> ⠙ Got 95 posts, but there is more.. [812ms]
#> ⠹ Got 194 posts, but there is more.. [1.3s]
#> ⠸ Got 291 posts, but there is more.. [1.7s]
#> ⠼ Got 378 posts, but there is more.. [2.3s]
#> ⠴ Got 465 posts, but there is more.. [2.6s]
#> ⠦ Got 562 posts, but there is more.. [3.2s]
#> ⠧ Got 658 posts, but there is more.. [3.6s]
#> ⠇ Got 753 posts, but there is more.. [4.1s]
#> ⠏ Got 845 posts, but there is more.. [4.7s]
#> ⠋ Got 939 posts, but there is more.. [5.2s]
#> ⠙ Got 1033 posts, but there is more.. [5.9s]
#> ⠹ Got 1132 posts, but there is more.. [6.5s]
#> ⠸ Got 1231 posts, but there is more.. [7.1s]
#> ⠼ Got 1331 posts, but there is more.. [7.8s]
#> ⠴ Got 1431 posts, but there is more.. [8.3s]
#> ℹ Parsing 1500 results.
#> ✔ Got 1500 results. All done!
#> 
#> # A tibble: 1,500 × 13
#>    uri     cid   created_at          author_handle author_name text  reply_count
#>    <chr>   <chr> <dttm>              <chr>         <chr>       <chr>       <int>
#>  1 at://d… bafy… 2023-12-04 15:15:25 pmaier1971.b… Philipp Ma… "Man…           0
#>  2 at://d… bafy… 2023-12-04 15:06:02 f2harrell.bs… Frank Harr… "New…           0
#>  3 at://d… bafy… 2023-12-04 14:19:00 jbgruber.bsk… Johannes B… "Are…           0
#>  4 at://d… bafy… 2023-12-04 14:08:32 bcrossman.bs… Brent Cros… "\n\…           0
#>  5 at://d… bafy… 2023-12-04 12:00:58 pmaier1971.b… Philipp Ma… "Bit…           0
#>  6 at://d… bafy… 2023-12-04 10:20:28 hrbrmstr.dev  hrbrmstr    "Day…           1
#>  7 at://d… bafy… 2023-12-04 08:56:53 steveharoz.c… Steve Haroz "#Rs…           0
#>  8 at://d… bafy… 2023-12-04 06:30:05 karawoo.bsky… Kara Woo    "Day…           0
#>  9 at://d… bafy… 2023-12-04 04:12:39 emitanaka.bs… Emi Tanaka  "My …           0
#> 10 at://d… bafy… 2023-12-03 16:40:47 bcrossman.bs… Brent Cros… "I j…           1
#> # ℹ 1,490 more rows
#> # ℹ 6 more variables: repost_count <int>, like_count <int>, indexed_at <dttm>,
#> #   author_data <list>, post_data <list>, embed_data <list>


search_post("rstats tiktok", limit = Inf)
#> ℹ Found 2 posts that fit the query
#> ℹ Parsing 2 results.
#> ✔ Got 2 results. All done!
#> 
#> # A tibble: 2 × 13
#>   uri      cid   created_at          author_handle author_name text  reply_count
#>   <chr>    <chr> <dttm>              <chr>         <chr>       <chr>       <int>
#> 1 at://di… bafy… 2023-12-04 14:19:00 jbgruber.bsk… Johannes B… "Are…           0
#> 2 at://di… bafy… 2023-11-07 08:03:23 jbgruber.bsk… Johannes B… "I n…           1
#> # ℹ 6 more variables: repost_count <int>, like_count <int>, indexed_at <dttm>,
#> #   author_data <list>, post_data <list>, embed_data <list>

^{Created on 2023-12-04 with reprex v2.0.2}

[pmaier1971]

Holy cow! That is AWESOME! Philipp

…

On Dec 4, 2023, at 12:05 PM, Johannes Gruber ***@***.***> wrote: I was too excited that search finally works and implemented it right away: library(atr) search_post("rstats", limit = Inf) #> ℹ Found 1569 posts that fit the query #> ⠙ Got 95 posts, but there is more.. [812ms] #> ⠹ Got 194 posts, but there is more.. [1.3s] #> ⠸ Got 291 posts, but there is more.. [1.7s] #> ⠼ Got 378 posts, but there is more.. [2.3s] #> ⠴ Got 465 posts, but there is more.. [2.6s] #> ⠦ Got 562 posts, but there is more.. [3.2s] #> ⠧ Got 658 posts, but there is more.. [3.6s] #> ⠇ Got 753 posts, but there is more.. [4.1s] #> ⠏ Got 845 posts, but there is more.. [4.7s] #> ⠋ Got 939 posts, but there is more.. [5.2s] #> ⠙ Got 1033 posts, but there is more.. [5.9s] #> ⠹ Got 1132 posts, but there is more.. [6.5s] #> ⠸ Got 1231 posts, but there is more.. [7.1s] #> ⠼ Got 1331 posts, but there is more.. [7.8s] #> ⠴ Got 1431 posts, but there is more.. [8.3s] #> ℹ Parsing 1500 results. #> ✔ Got 1500 results. All done! #> #> # A tibble: 1,500 × 13 #> uri cid created_at author_handle author_name text reply_count #> <chr> <chr> <dttm> <chr> <chr> <chr> <int> #> 1 at://d… bafy… 2023-12-04 15:15:25 pmaier1971.b… Philipp Ma… "Man… 0 #> 2 at://d… bafy… 2023-12-04 15:06:02 f2harrell.bs… Frank Harr… "New… 0 #> 3 at://d… bafy… 2023-12-04 14:19:00 jbgruber.bsk… Johannes B… "Are… 0 #> 4 at://d… bafy… 2023-12-04 14:08:32 bcrossman.bs… Brent Cros… "\n\… 0 #> 5 at://d… bafy… 2023-12-04 12:00:58 pmaier1971.b… Philipp Ma… "Bit… 0 #> 6 at://d… bafy… 2023-12-04 10:20:28 hrbrmstr.dev hrbrmstr "Day… 1 #> 7 at://d… bafy… 2023-12-04 08:56:53 steveharoz.c… Steve Haroz "#Rs… 0 #> 8 at://d… bafy… 2023-12-04 06:30:05 karawoo.bsky… Kara Woo "Day… 0 #> 9 at://d… bafy… 2023-12-04 04:12:39 emitanaka.bs… Emi Tanaka "My … 0 #> 10 at://d… bafy… 2023-12-03 16:40:47 bcrossman.bs… Brent Cros… "I j… 1 #> # ℹ 1,490 more rows #> # ℹ 6 more variables: repost_count <int>, like_count <int>, indexed_at <dttm>, #> # author_data <list>, post_data <list>, embed_data <list> search_post("rstats tiktok", limit = Inf) #> ℹ Found 2 posts that fit the query #> ℹ Parsing 2 results. #> ✔ Got 2 results. All done! #> #> # A tibble: 2 × 13 #> uri cid created_at author_handle author_name text reply_count #> <chr> <chr> <dttm> <chr> <chr> <chr> <int> #> 1 at://di… bafy… 2023-12-04 14:19:00 jbgruber.bsk… Johannes B… "Are… 0 #> 2 at://di… bafy… 2023-11-07 08:03:23 jbgruber.bsk… Johannes B… "I n… 1 #> # ℹ 6 more variables: repost_count <int>, like_count <int>, indexed_at <dttm>, #> # author_data <list>, post_data <list>, embed_data <list> Created on 2023-12-04 with reprex v2.0.2 <https://reprex.tidyverse.org/> — Reply to this email directly, view it on GitHub <#7 (comment)>, or unsubscribe <https://github.com/notifications/unsubscribe-auth/ABB6OROESZJ3LFWSORZU6MLYHX7F3AVCNFSM6AAAAABAEDFBPSVHI2DSMVQWIX3LMV43OSLTON2WKQ3PNVWWK3TUHMYTQMZZGA4DQNZQGE>. You are receiving this because you authored the thread.

[JBGruber]

Hey @pmaier1971 , is the problem resolved? If so, could you please close the issue?