tc_name <- "training"
x <- build_frame(
"measure" , tc_name, "validation", "idx" |
"minus binary cross entropy", 5 , 7 , 1L |
"accuracy" , 0.8 , 0.6 , 2L )
print(x)
cat(draw_frame(x))
Run the code above in your browser using DataLab