r - Radio Buttons on Shiny Datatable, with data.frame / data.table -

-

pretty copy paste this example (which, assume, supersedes of other answers on so) except i'm trying use data.table instead of matrix. i'm unable figure out why isn't working.

library(shiny) library(dt) shinyapp(   ui = fluidpage(     title = 'radio buttons in table',     dt::datatableoutput('foo'),     verbatimtextoutput('sel')   ),   server = function(input, output, session) {      m = data.table(       month1 = month.abb,        = '1',        b = '2',        c = '3',        qwe = runif(12)     )       m[, := sprintf(         '<input type="radio" name="%s" value="%s"/>',         month1, m[, a]       )]       m[, b := sprintf(         '<input type="radio" name="%s" value="%s"/>',         month1, m[, b]       )]       m[, c := sprintf(         '<input type="radio" name="%s" value="%s"/>',         month1, m[, c]       )]      output$foo = dt::renderdatatable(       m, escape = false, selection = 'none', server = false,       options = list(dom = 't', paging = false, ordering = false),       callback = js("table.rows().every(function(i, tab, row) {           var $this = $(this.node());           $this.attr('id', this.data()[0]);           $this.addclass('shiny-input-radiogroup');         });         shiny.unbindall(table.table().node());         shiny.bindall(table.table().node());")     )     output$sel = renderprint({       str(sapply(month.abb, function(i) input[[i]]))     })   } )

issue rownames. have column of rownames gets shiny attributes added it, isn't radio buttons it's text breaks (although should throw error).

here working version:

library(shiny) library(dt) shinyapp(   ui = fluidpage(     title = 'radio buttons in table',     dt::datatableoutput('foo'),     verbatimtextoutput('sel')   ),   server = function(input, output, session) {      m = data.table(       month1 = month.abb,       = '1',       b = '2',       c = '3',       qwe = runif(12)     )     m[, := sprintf(       '<input type="radio" name="%s" value="%s"/>',       month1, m[, a]     )]     m[, b := sprintf(       '<input type="radio" name="%s" value="%s"/>',       month1, m[, b]     )]     m[, c := sprintf(       '<input type="radio" name="%s" value="%s"/>',       month1, m[, c]     )]      output$foo = dt::renderdatatable(       m, escape = false, selection = 'none', server = false, rownames=false,       options = list(dom = 't', paging = false, ordering = false),       callback = js("table.rows().every(function(i, tab, row) {                     var $this = $(this.node());                     $this.attr('id', this.data()[0]);                     $this.addclass('shiny-input-radiogroup');   });                     shiny.unbindall(table.table().node());                     shiny.bindall(table.table().node());")     )     output$sel = renderprint({       str(sapply(month.abb, function(i) input[[i]]))     })     } )

Comments

Post a Comment

Popular posts from this blog

c - zlib and gdi32 with OpenSSL? -

-
this follow question undefined reference rsa_generate_key in openssl? have openssl program generate rsa key, follows : #include <stdio.h> #include <openssl/rsa.h> #include <openssl/pem.h> int main(int argc, char* argv[]) { rsa *r = null; int ret; r = rsa_new(); bignum *bne = null; ret = rsa_generate_key_ex(r, 2048, bne, null); return 0; } when compile gcc -i../include rsatest.c -lcrypto -l. i undefined reference errors functions in libraries gdi32 , zlib. so correct this, have add -lz , -lgdi32, as gcc -i../include/ rsatest.c -lcrypto -lz -lgdi32 -l. my question is, aren't static libcrypto , libssl self sufficient? in why having add libraries make work? there option should have added while compiling library prevent this? i'm using 64 bit windows mingw compiler. made openssl library of msys , make.
Read more

java - inputmismatch exception -

-
Image
this question has answer here: scanner skipping nextline() after using next(), nextint() or other nextfoo()? 14 answers import java.util.*; public class ngg { static scanner numberentered; static scanner userinput = new scanner(system.in); static int guessednumber; static int randomnumber = (int) (math.random()* 11); static scanner reply; static string answer; public static void main(string[] args) { guesschecker(guessednumber); } public static void guesschecker(int userguess) { while (userguess != randomnumber) { intro(); userguess = intchecker(); if (userguess == randomnumber) { system.out.println("congradulations!"); system.exit(0); } else { system.out.println("that incorrect!");...
Read more

ios - Align baselines with characters in large line heights with Text Kit -

-
Image
when draw attributed string fixed line height text kit, characters aligned bottom of line fragment. while make sense on 1 line characters varying in size, breaks flow of text multiple lines. baselines appear decided largest descender each line. i've found article people behind sketch explaining exact problem in bit more detail , showing solution does, not explaining how achieved this. this want basically: when showing 2 lines large line height, result far ideal: the code i'm using: let smallfont = uifont.systemfont(ofsize: 15) let bigfont = uifont.systemfont(ofsize: 25) let paragraphstyle = nsmutableparagraphstyle() paragraphstyle.minimumlineheight = 22 paragraphstyle.maximumlineheight = 22 var attributes = [ nsfontattributename: smallfont, nsparagraphstyleattributename: paragraphstyle ] let textstorage = nstextstorage() let textcontainer = nstextcontainer(size: cgsize(width: 250, height: 500)) let layoutmanager = nslayoutmanager() textstorage.append(n...
Read more