[SPARK-21208][R] Adds setLocalProperty and getLocalProperty in R

[HyukjinKwon]

What changes were proposed in this pull request?

This PR adds setLocalProperty and getLocalPropertyin R.

> df <- createDataFrame(iris)
> setLocalProperty("spark.job.description", "Hello world!")
> count(df)
> setLocalProperty("spark.job.description", "Hi !!")
> count(df)

> print(getLocalProperty("spark.job.description"))
NULL
> setLocalProperty("spark.job.description", "Hello world!")
> print(getLocalProperty("spark.job.description"))
[1] "Hello world!"
> setLocalProperty("spark.job.description", "Hi !!")
> print(getLocalProperty("spark.job.description"))
[1] "Hi !!"

How was this patch tested?

Manually tested and a test in R/pkg/tests/fulltests/test_context.R.

[HyukjinKwon]

I tried to make a better description for a while but then just ended up with copying Python's:

spark/python/pyspark/context.py

Lines 934 to 939 in 209b936

	def setLocalProperty(self, key, value):
	"""
	Set a local property that affects jobs submitted from this thread, such as the
	Spark fair scheduler pool.
	"""
	self._jsc.setLocalProperty(key, value)

[HyukjinKwon]

cc @felixcheung, could you take a look please?

[SparkQA]

Test build #85369 has finished for PR 20075 at commit c9c7aee.

• This patch fails due to an unknown error code, -9.
• This patch merges cleanly.
• This patch adds no public classes.

[HyukjinKwon]

retest this please

[SparkQA]

Test build #85370 has finished for PR 20075 at commit c9c7aee.

• This patch passes all tests.
• This patch merges cleanly.
• This patch adds no public classes.

[felixcheung]

LG, I’d as.character on both the key and value to make sure it doesn’t fail with signature mismatch. Also should we also have getLocalProperty, you think?

[HyukjinKwon]

Yea, let me update it soon.

[SparkQA]

Test build #85405 has finished for PR 20075 at commit 650a486.

• This patch passes all tests.
• This patch merges cleanly.
• This patch adds no public classes.

[SparkQA]

Test build #85406 has finished for PR 20075 at commit 3c49523.

• This patch passes all tests.
• This patch merges cleanly.
• This patch adds no public classes.

[felixcheung]

getLocalProperty Should not be returning invisible, I think. Also can you check if we need to fail for key == NA?

[HyukjinKwon]

Yup, they should be handled too. Let me update.

[HyukjinKwon]

Just to be clear, is.na case seems fine with passing it with as.character. I added the test.

[SparkQA]

Test build #85417 has finished for PR 20075 at commit 6366cf9.

• This patch passes all tests.
• This patch merges cleanly.
• This patch adds no public classes.

[felixcheung]

Great LGTM

[HyukjinKwon]

Merged to master.

Thank you @felixcheung.