Javascript Question posted in
A very good W3school tutorial can be found here.

Javascript – R Rhandsontable highlight entire row based on condition

I want to highlight all rows in a rhandsontable that meet a certain condition.
Unfortunately, I have found neither an option nor a suggested solution for this on the net.

Here is my reproducible example:

library(tidyverse)
library(rhandsontable)

rhandsontable(mtcars) %>%
  hot_col(col = "cyl", renderer = "
  function (instance, td, row, col, prop, value, cellProperties) {
    Handsontable.renderers.NumericRenderer.apply(this, arguments);
    if ( value === 4 ) {
    td.style.background = '#ff000090';
    }
  }
  ")

In this example, all rows where the cyl-value is 4 should be highlighted in red.
My code already works for the respective cell:
enter image description here

However, I don’t want the individual cell to be coloured red, but the entire row.
Can someone help me and make the adjustments in Javascript?

Tags:

2

Answers


  1. Chosen as BEST ANSWER
    0

    I found a solution based on this issue:
    Color a whole row in rhandsontable based on a string value in one column

    mtcars %>% 
  rhandsontable(
    row_highlight = which(.$cyl == 4) -1
  ) %>%
  hot_cols(renderer = "
            function (instance, td, row, col, prop, value, cellProperties) {
                     Handsontable.renderers.TextRenderer.apply(this, arguments);

                     if (instance.params) {
                       hrows = instance.params.row_highlight
                       hrows = hrows instanceof Array ? hrows : [hrows]
                       hcols = instance.params.col_highlight
                       hcols = hcols instanceof Array ? hcols : [hcols]

                       if (hrows.includes(row)) {
                         td.style.background = '#ff000090' 
                       }

                     }
            }"
  )

    enter image description here


  2. 0

    Here is one solution, is not the most elegant, but it works. I had to place the cyl column in the last position to colour the full row, and identify the td that meet the condition.

    rhandsontable(mtcars[, c(setdiff(names(mtcars), "cyl"), "cyl")]) %>%
  hot_col(col = "cyl", renderer = '
  function (instance, td, row, col, prop, value, cellProperties) {
    Handsontable.renderers.NumericRenderer.apply(this, arguments);
    if (value === 4) {
      $(td).parent().find("td").css("background-color", "#ff000090");
    }
  }
  ')

    enter image description here

    Login or Signup to reply.
Please signup or login to give your own answer.

Back To Top
Search