tests/testthat/test-variable_list.R

context("variable-list")

test_that("torch_variable_list works correctly", {
  x <- list(torch_tensor(1), torch_tensor(2))
  obj <- torch_variable_list(x)
  y <- obj$to_r()

  expect_length(y, 2)
  expect_s3_class(y[[1]], "torch_tensor")
})

Try the torch package in your browser

Any scripts or data that you put into this service are public.

torch documentation built on June 7, 2023, 6:19 p.m.