Let us instead see what the estimates would be if the penalty was $11498.$ Store your output to tidy$2.$ What do you notice?

# Your code here

$$

# tidy$2<-$

tidy$2<-$ tidy$($fit$($ridge$\_$spec, Salary ~ $.,$ data $=$ Hitters, penalty $=11498))$

$$

# Print the parameter estimates for penalty $=11498$

tidy$2$

$$

# your code here

$$

Error in $`$check$\_$form$\_$dots$()`$:

$!$ These argument$($s$)$ cannot be used to create the data: $`$penalty$`.$ Possible arguments are: $`$subset$`,`$weights$`$

Traceback:

$1.$ tidy$($fit$($ridge$\_$spec, Salary ~ $.,$ data $=$ Hitters, penalty $=11498))$

$2.$ fit$($ridge$\_$spec, Salary ~ $.,$ data $=$ Hitters, penalty $=11498)$

$3.$ fit.model$\_$spec$($ridge$\_$spec, Salary ~ $.,$ data $=$ Hitters, penalty $=11498)$

$4.$ form$\_$xy$($object $=$ object, control $=$ control, env $=$ eval$\_$env, target $=$ object$method$fit$interface,

$....)$

$5..$convert$\_$form$\_$to$\_$xy$\_$fit$($formula $=$ env$formula, data $=$ env$data,

$....,$ composition $=$ target, indicators $=$ indicators, remove$\_$intercept $=$ remove$\_$intercept$)$

$6.$ check$\_$form$\_$dots$($dots$)$

$7.$ rlang::abort$($glue::glue$("$These argument$($s$)$ cannot be used to create the data: $",$

$.$ glue::glue$\_$collapse$($glue::glue$("`\{$names$($x$)[!$good$\_$names$]\}`"),$

$.$ sep $=","),".$ Possible arguments are: $",$ glue::glue$\_$collapse$($glue::glue$("`\{$good$\_$args$\}`"),$

$.$ sep $=",")))$

$8.$ signal$\_$abort$($cnd$,.$file$)$