xlsx load

Dear all

I want to load the xlsx package and ,the R version is 3.3.1 (2016-06-21) .
but i cant and have taken this message:

local({pkg <- select.list(sort(.packages(all.available =

TRUE)),graphics=TRUE)
+ if(nchar(pkg)) library(pkg, character.only=TRUE)})
Loading required package: rJava
Error : .onLoad failed in loadNamespace() for 'rJava', details:
  call: fun(libname, pkgname)
  error: JAVA_HOME cannot be determined from the Registry
Error: package ?rJava? could not be loaded

local({pkg <- select.list(sort(.packages(all.available =

TRUE)),graphics=TRUE)
+ if(nchar(pkg)) library(pkg, character.only=TRUE)})
Error : .onLoad failed in loadNamespace() for 'rJava', details:
  call: fun(libname, pkgname)
  error: JAVA_HOME cannot be determined from the Registry
Error: package or namespace load failed for ?rJava


please help me

*Mahnaz *