"subscript out of bounds" when "vsc.str.max.level" > 0

[chadbot]

Describe the bug

It seems the workspace browser can't handle nested levels of tbl_graph objects from the tidygraph package.

To Reproduce

Minimal reproducible example:

# load required packages
library(tidyverse)
library(igraph)
library(tidygraph)

# setting workspace level to anything > 0 creates error
options(vsc.str.max.level = 1)

# create a simple igraph object
g <- erdos.renyi.game(10, .1)

# converting to a tbl_graph object produces the error (note that code still runs)
g <- as_tbl_graph(g)

# once the error starts, all commands produce it
x <- 1

The error goes away when vsc.str.max.level is set to 0:

options(vsc.str.max.level = 0)

g <- as_tbl_graph(g)

x <- 1

Do you want to fix by self? (We hope your help!)

Not right now. Perhaps if no one fixes, I will be able to take it on in the near future.

Expected behavior

No error message.

Environment (please complete the following information):

• OS: Ubuntu 18 (remote ssh), MacOS 11.5 (local)
• VSCode Version: 1.59.0
• R Version: 4.1.1
• vscode-R version: 2.1.0

[renkun-ken]

Looks like g as a tbl_graph does not correctly implement str.tbl_graph since the error occurs at

> str(g)                                                                                                                                                 
List of 10
 $ :List of 1
  ..$ : 'igraph.vs' int 2
  .. ..- attr(*, "env")=<weakref> 
  .. ..- attr(*, "graph")= chr "af076129-4837-4be3-8b78-92e495a7f04c"
 $ :List of 1
  ..$ : 'igraph.vs' int [1:2] 1 5
  .. ..- attr(*, "env")=<weakref> 
  .. ..- attr(*, "graph")= chr "af076129-4837-4be3-8b78-92e495a7f04c"
 $ :Error in oTypes[[i]] : subscript out of bounds
Backtrace:
1: str.default(g)
2: str(g)

[chadbot]

Great. I figured this was a pretty easy fix. Thanks! (Great extension, btw...)